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PHEFACE 



MERLIN is a "mini" operating system for computer systems based 
on the Motorola MC68000 microprocessor. 

The MERLIN Operating System Documentation is arranged into two 
distinct boolcs. 

The User's Guide is a "concepts and facilities" manual which 
explains the core ideas of MERLIN -> its command interpreter, file 
system, and the utility commands that provide a means to get 
started on MERLIN. The User's Guide also contains information 
about the software packages and utilities that run under MERLIN. 
There are descriptions of how to run the compilers, the linker 
and librari2m, and a summeiry of £S - the line-oriented editor. 

The Internals Guide is a MERLIN Internal Interface Guide for 
programmers wishing to write software to run under MERLIN - it 
covers topics such as file structures, memory layout, device 
drivers, and other information about MERLIN. 

There are other manuals in addition to these two. The 
additional- manuals ace whole, self-contained manuals such as the 
Pascal and FORTRAN reference manuals. These are separate because 
(a) they are large and placing them in the user's Guide would 
make that manual impossibly large, and (b) because they are 
separately priced-products. 
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Chapter 1 
Introduction 



MESLIN is a basic «xacutiv« program for SSOOO-baaed 
microcoinputar aystems. Its oain purpose is to provide an 
operating environment in which users can develop and run software 
applications quickly and easily. MEKLIN's main features include: 

Single-^sec system - the user has the full power and 
responsiveness of the HCSdOOQ system available with no 
competition for resources with other users. 

. Fixed and demountable volumes (devices) . 

. Two level file structure. 

. UNIX-like command language with re-direction of input and 
output. 

. Automatic startup command file for initialization. 

. The shell or command interpreter is simply a system command - 
users can develop their own shells to suit their specific 
ne«da. 

Assignable devicA drivers - new device drivers can be 
incorporated without th* need for system reconfiguration. 

t7s«rs view MESLIN as composed o£ several distinct parts: 

the file system provides a way to store data in named 
collections called files and a way to create, examine, remove, 
copy, and otherwise manipulate such files. 

. the command interpreter , known as "the shell", provides the 
basic means o£ telling MSSLIN what things it should do. 

the grogr^mT"ing languages provide the means to write new 
software applications. MEltLXN supports Pascal, FORTRAN, an 
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Assembler, and a Linker. 

the utility software supplies tools to aid in using the 
system. Utilities include an editor for creating and changing 
text files, disk-file manipulation programs and object code 
mangagement programs. 

Users use these basic operating system facilities to generate 
their own applications packages or to do other useful work. 
There are many commercially available packages for business and 
scientific use written in languages supported by MEIILIN. 

On the surface, MEBLI2I looks somewhat like UKIX (for users 
familiar with UNIX) , in that MEBLI^ uses the same command layouts 
and methods to indicate options. lMSBLXN also uses the same 
notation foe describing files. It should be noted, however, that 
MSBLIN is not UNIX, and does not have the power and capabilities 
of a full UNIX system. 

This document is intended as an internal interface guide for 
those wishing to write software to run under .VElIULI^T's control. 

Internally, MEBLIN's file system is not a proper hierarchical 
file system. The file system in fact is at this time compatible 
with the OCSO ?A2CAZi file system. There were some good reasons 
for doing this, the major one being a portability issue. 



1.1 Overview and Layout of this Guide 

Chapter 2 is a "general information" chapter which describes 
the basic details of MZSLIN, discusses the idea of units, and 
describes some of the data structures necessary. 

Chapter 3 is a detailed breakdown of the various system calls 
that MESI.IN provides. 

Chapter 4 provides a description on "how to write a device 
driver". An annotated sample device is provided. 

Chapter S is a list of the ?ascal types and procedure 

interi!aces that are described in narrative form in Chapter 3. 

These Pascal interfaces are there for those who are more 
comfortable in Pascal. 
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Oxapter 2 
General Laforaation 

Thi3 Chaptsr supplies general information about data structures 
and the means by which software makes MERLIN system calls. 
Topics covered in this Chapter are: 

. a description of the units that MERLIN supports. 

. data representation. 

. various data structures such as the system communication area. 

. memory layout, and progrsua environment. 



2.1 Units 

MERLIN, as stated previously, looks somewhat like the OCSO 
Pascal system. MERLIN knows about several units , that is, 
external devices to or from which data nay be transferred. 

Generally speaking, it is only neccessary to be concerned with 
units when using unit input'-output • the software layer below 
that of file input-output. the unit numbers that MERLIN 
currently deals with are as follows: 

tJnit Number and Neune Description 

- /noU is a "null" device. It acts as an infinite sink 

or "black hole" when it is written to; when is 
is read from, an end-of-file condition is 
returned. 

1 - /eeoaole is the console, that is, the -keyboard and 

screen, with echo. 
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3 - 

4 - 



/systera is the console, that is, 
screen, without echo ■ 

is user assignable. 



the 'keyboard and 



is the boot disk - the disk from which MERLIN 
boots up, and the default disk on which MERLIN 
looks for commands. 



5 - /printer 
7 - /reain 

3 - /ramoat 

9 . . 12 
13. .20 



is a user disk, 
also user disks. 



Mote that devices 9.. 12 are 



is the printer if one is attached. 

is the remote input device, such as a serial 
line. 

is the remote output device, corresponding to 
(7) above. 

are user disks. 

are user assignable devices. There .nay be 
different numbers of user assignable devices in 
different implementations of MERLIN. 



2.2 Data Reocesentations in MERLIN 



This Section describes the way that data is represented 
internally in MERLIN. 

MERLIN is implemented almost entirely in 63000 ?ascal, with a 
small number of lines of assembler code to perform raw' device 
h2;ivfli.ng . Thus the discussion on data representations and memory 
layout represent the Pascal implementations. These notes are for 
users wishing to interface foreign language implementations to 
the Pascal oriented MERLIN system. 

2.2.1 Characters, Words, and Long Words 

Characters, words, and long words are t.he three basic data 
types. Data elements whicti occupy words are always aligned on 
word (even byte) boundaries. 
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Characters , or bytes , occupy 16 bits if they are not pacHad. 
Packed characters occupy a byte and are aligned on a byte 
boundary . 

Words occupy two bytes, or 16 bits. Words are the Pascal 

integer data types. Words are always aligned on a two byte 

boundary. words represent . signed integers in the range 
-32768 .. +32767. 

Long Words occupy four bytes, or 32 bits. Long words are 
always aligned on a two byte boundary. Long words are accessible 
in Pascal by the longlnt data type. Long words represent signed 
integers in the range -2,147,483,648 .. +2,147,483,647. Long 
words are also used to store memory addresses and pointers in 
Pascal . 

2.2.2 Boolean Data Type 

The Pascal implementation has a Boolean data type. A Boolean 
is always represented in a single byte quantity. A value of 
(zero) represents fala«. A value of 1 (one) represents true. Mo 
other values are valid. When a Boolean value is not an element 
of a pacleed data structure, a full byte of storage is used to 
facilitate access. 

2.2.3 The NIL Pointer 

As mentioned above, the Pascal implementation uses a long word 
or 32-bit quantity to represent a pointer. One of the important 
pointers is the nil pointer which points to no data element (for 
example, used to indicate the end of a list) . In this 
implementation, nil. is represented by the value zero (0). 

2.2.4 The String Data Type 

Pascal has a dynamic sized string data type similar to that of 
the OCSD Pascal system. A string ■ is a sequence of bytes in 
memory, with the first byte in the string containing the length 
of the string (not including the first byte) . This means that 
th* maximum string length is 255 bytes. A string value must be 
aligned on a word boundary. 

2.2. 5 Packed Array of Character 
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The Packed ^xay oi Cliar(acter) data t'/pe is hoc the same as 
the length delimited string type described above. The ?aci<ed 
Array of Character is simply a stream of bytes in memory. There 
is no length field as in the string data type above. As with 
dynamic sized strings, a paclted array of character must be 
aligned on a word boundary. 
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2.3 The System Conmunieation Area 

MEHLIN maintains a System Communication Area in RAM. The System 
Communication Area contains global information that is important 
to running programa. Two. o£ the important items are the 
"lORESULT", which is the return code from input-output 
operations, and the start address of the system call jump 
vector. 



The System Communication Area base address is contained in the 
long word found in absolute location $130. The System 
Communication Area layout is described here. 



lOREStJLT 



is a word value which contains a result code 
after completion of any input-output process. 



PROCSSS NUMBER is a word value, which is the current process 
number. The initial shell is assigned process 
number 0. Each subsequent^ process receives an 
incremented process nusiber. 



FEtSE HEAP 



is a long word painter to the start of the free 
memory available for storage allocation. 



SYSTEM CAU: VECTOR 

is a long word pointer to the start of the 
system call vector. The system call vector is a 
table of jump addresses to the system routines. 
This is described, in more detail later on. 



S7S0UT 



SYS IN 



is 9. long- word pointer to the initial shell's 
standard output file. SYSIN and SYSCtlT are used 
for court of last resort error messages when the 
Pascal system runs into trouble, for example, 
whexr it runs short: of allocatable storage. 

is a long word pointer to the initial shell's 
standard input file. 



SYSTEM DEVICE TABIiS 

is a long word pointer to the device table. 

DIRECTORY HAMS is a long word pointer to the currently "logged" 
directory nam*. 
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USER TABLS 13 a long word pointer to the start address of 
the usee command table. 



DATS RECORD 



is the encoded form of the current date. The 
Date Record occupies one word. 



OVERLAY TABLS ADDRESS 

is a long word value which is the start address 
of the overlay table. This value is only used 
when the running process contains overlays. 
Othervise it contains a zero (0) . 

NEXT PROCESS NUMBER 

is a word value that the next process number 
will be assigned. 

JTOMBER OF PROCESSES 

is a word value representing the number of 
processes currently active (including the first 
level shell} . 

?ROCESS TABLS ADDRESS 

is a long word pointer to the process table. 
The process table is simply a save area for 
process context information. 



300T NAME 
MEM MAP 

300TDEV 



is a long word pointer to the name of the device 
from which to boot the system. 

is a long word pointer to a table describing the 
limits of memory available to MERLIN on the 
current hardware. 

is a word value representing the device number 
of the initial boot device. 
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byte +0 1 lORESULT | 


-I-2 1 Process iluiabec | 


+4 1 Pointer to next available free space on the heap | 
+3 1 Pointer to start of System Call Vector | 
+12 1 Pointer to System Output Pile | 


+16 1 Pointer to System Input File | 


+20 I Pointer to System Device Table | 


+24 1 Pointer to Boot Device Directory Name | 


+23 { Pointer to Start of aser Command Table | 


+-32 I Today's Date (held as a Packed Record) | 


+34 1 Overlay Jump Table Address | 


+38 1 Next Process Number | 


+40 I Number of Processes | 


+42 1 Pointer to the Process Table Array | 


+46 1 Pointer to tJae Name of the Boot Device | 


+50 1 Pointer to Memory Bounds Map | 


+54 '{ Boot Device Number | 






Figure 2-1 
System Communication Area Layout 



2.4 The System Call Vector 



All MERLIN system calls are, at this time, made by reference 
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through a vector of procedure addresses. The start address of 
the system call vector is found in the system communication area, 
described previously. Each entry in the system call vector is a 
long word (32-bit) pointer. The table below is a list of the 
entries in the system call vector. 



Offset 1 Routine Name 





UNIT WRITS 


1 


raiT READ 


2 


UNIT CLZAR 


3 


ONIT BUSY 


4 


PPUT 


5 


FGET 


6 


FINIT 


7 


POPES 


3 


FCLOSE 


9 


WRITECHAR 


10 


READCHAR 


11 


BLOCKIO 


12 


PSEEK 


13 


NEW 


14 


DISPOSE 


15 


MARX 


16 


RELEASE 


17 


MEMAVAIL 


13 




19 


LOADl 


20 


REMOVEl 


21 


SYSTEM DESnG 


22 


MERLIN 



Description 



Direct write to unit. 

Direct read from a unit. 

Clear - reset a unit. 

Check if unit is busy. 

Write one record to a file. 

Read one record from a file. 

Initialize a file. 

Open a file. 

Close a file. 

Write a character to a file. 

Read a character from a file. 

Bloclt input-output. Transfer a 

specified number of blocks to or 

from a file. 

Position a file to a specific record. 

Allocate menKsry on the heap. 

Remove allocated memory. DISPOSE is 

currently a no-op. Mmemory management 

is handled with MARK and RELEASE. 

Mark the current position of the top 

of heap. 

Cut the heap back to a previously 

MARK'ed position. 

Determine amount of me.Tiory available 

foe dynamic storage allocation. 

Get directory name. 

Calls the loader to load an overlay. 

Remove (unload) an overlay. 

If MILr there is no debug available. 

The entry point to restart MERLIN. 



Figure 2-2 
The System Call Vector 

The last four entries in the table above are used by MERLIN and 
need not normally be accessed by user programs. 
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PEA 


FBUPF 


CLa.w 


-(3P) 


VSOVZ.L 


?iao.w,AO 


MOVE.L 


a(AO) ,A0 


MOVE.!. 


32{A0),A0 


JSE 


(AO) 



2.4.1 Calling a Systea Routine 

TO call a system routine, the appropriate parameters must be 
pushed onto the stack. The last thing pushed onto the 3tac)( 
should be the return address (normally pushed via a J5R 
instruction) . The address of a system routine is extracted from 
the system-call vector, and a JSR to that address is then 
executed. 

The code fragment below illustrates a way to call a system 
routine. In this specific example, the routine E'CLOSE is called 
to close a file. 

?uah address of ?XB. 
Close type :• MOHMAL. 

AO :• System Communication Area address. 
AO :« System Call Vector address. 
AO :« Address of FCLOSE entry. 
Call the FCLOSE routine. 
Return Address ...; FCLOSE returns to here 



2.5 File Infoemation Block (FIB) 

Access to files requires passing the address of a File 
Infoemation Block, abbreviated to FIB. A FIB contains all 
Information about a file, its type, buffering and so on. 

Bsfore a fll* can bs opened, an FIB nust be allocated. The 
total nuabee of bytss to b* allocated depends on whether using 
Block input'-cutpat is b«lng used. If Block input-outputis being 
assd, the FIB is 64 bytes long. In this case, the user must also 
allocate a buffer for the block. If Block input-output is not 
being used, in other words the file is a text file or an ISO file 
of typ*, the FIB is 576 bytes long, plus the number of bytes in a 
record. 

WDSfDOV is a long word pointer to the file 'window' - 

th* area at the end of the FIB that holds the 
current record. 

SMD OF LINE is a Boolean that is txram if an end-of-line was 
encountered in the file, fals* otherwise. 
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SND OF FIL£ 
T2XT 

STAT2 

RECORD SIZE 
?IL2 IS OPEN 



is a Boolean that is true i£ the file is 
positioned at end-of-file, false otherwise. 

is a Boolean that is txu« if this is a text 
file. This is true foe interactive (mode 0) pr' 
text (mode -2) files. It Is false for any other 
file type. 

is a word value that can take on the values 0/ 
1, 2 or 3. This field is only used for text 
files. 

is a word quantity that defines the number of 
bytes in a record. 

is a Boolean quantity, when tru«, the following 
inforoation in the structure is valid. 



?ILE IS BLOCKED is a Boolean value that is tru« if the file 
resides on a blocked device. 



CTNIT OTMBER 
VOLUME NAME 

REPEAT COUNT 
NEXT 3L0CX 

.HAXIMCM BLOCX 

.H0DI71SD 
HEADER 



is a word that contains the current unit number 
for this file. 

is an eight byte 'string that contains the name 
of the volume on which this file resides. The 
first byte in the string is the number of bytes 
in the volume name. 

is a word quantity that represents the number of 
leading spaces on a line. It is included here 
for OCSD Pascal compatibility. 

is a word quaintity which is the number of the 
next block to be read from or written to the 
file. This field only applies when the. file is 
an ISO or a text file. 

is a word quantity that is the number of the 
last block in the file. 

is a Boolean quantity that, when true, indicates 
that this file has been changed. 

is a directory entry. This information is used 
by the file system and contains information such 
as the file's name, relative disk location and 
latest modification date. The directory entry 
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occupies 26 bytes in the F13. 



SOFT BOFPEH 



NEXT BYTE 



MAXIMDM BYTE 



BUTTEH CSANGEO 



BUFFER 



is a Boolean quantity that when true, indicates 
that the file buffer for this file is actually a 
part of this structure, instead of separately 
allocated as in the case of a bloclced file. 
When SOFT BUFFER is true, the following items 
are part of the File Information Block. 

is a word quantity that is the next byte 
position to be read or written in the buffer. 

is a word quantity that is the number of the 
last byte .in the buffer. This is used when 
reading a file that has a partial last bloclc or 
when writing any file. 

is a Beoleaa quantity that when tra*/ indicates 
that the file buffer in this FIB has been 
changed and therefore oust be eventually written 
back to the disk. 

is a S12 byte array - the size of one logical 
disk block. 



HSCORD WINDOW is an array of bytes sufficiently large to hold 
on* record from the file. If that record is an 
odd number of bytes in size, the buffer is 
increased to be an even number of bytes long. 

The diagram on the nexfe pag* i^ & graphic layout of a File 
Information Block. 
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byte +0 I Pointer to the File Buffer | 

+4 I End Of Line | End Of Pile | 

+6 I Text ?ile | Pile State j 

+3 I Record Length I 

+10 I File la Open i Pile Is Blocited 



+12 I Unit Muaber on which the File resides i 

+14 { Length of Valiuna Name | Volume dame (7 bytes) ...| 

-!-—-••———«—.—>— ——.4— ————————— ————— -h 

+22 I Maximum Bloclc | 

+24 I Next Blocic I 

+26 I Repeat Count | 

+23 I File Has Been Modified | - anused | 

+30 I First Blocic I 



+32 I Next Blocic | 

+34 I Fils Kind I Unused j 



+36 I Length Byte of Filename | Filename (13 bytes)... 
+52 I Number of Bytes in the Last Blocic of the File 



+54 I Month (4) I Day (5 bits) | Year (7 bits) 
+56 I Unused I File has Soft Buffer 



+53 I Maximum Byte I 

+60 I Next Byte I 

+62 I Unused | Buffer has been Changed | 

+64.. 371 I 512 byte buffer if the file has a 'soft buffer' | 

+572 1 'window' big enough for one record of the file i 
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2.6 Device Directory 



A directory resides on a blocked device. The device directory 
contains information about the volume and the files that reside 
on that volume. A complete directory is an array of 73 directory 
entries/ the first entry being the header record which describes 
the specific volume. The other 72 entries are for the files thdt 
reside on the device. Th» elements in a directory entry are 
described here: 



FIHST BLOCK 



M£XT BLOCK 



FILE KIND 



is a vK)rd quantity which is the number of the 
first available block on this device. This 
entry is nocmall zero (0) . 

is a word quantity which is the number of the 
next available block after this entry. ?or the 
volume header entry r this is normally 6. 

is a four-bit quantity which is the kind of file 
that this entry describes. The next two 
Subsections describe the different layouts of a 
directory entry depending on the file kind 
field. The values of file kind that are of 
interest, are: 



Q 
2 
3 
5 

3 



a directory header entry. 

a code file. 

a text file. 

a data file. 

is also a directory header entry. 



the file kind entry is followed by 12 bits of 
unused space to fill up the word. 

2.6.1 Directory Entry for a Header Record 

If the FILE KIND field in the directory entry indicates that 
this entry is a directory header record, the following fields are 
valid: 
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VOLUME SAME I3 an 3-byte field consisting of a length byts 
followed by seven characters of che volume 
name. 

LAST BLOCK a word quantity which is the number of the last 
available blocit on this volume. 

MUMBER OP FILES a word quantity which is the number of, files on 
this volume. 

LOAD TIME a word quantity which is not used - it is set to 
zero. 

LAST SOOT is a word quantity which contains the moat 
recent setting of the date. This word is in 
fact a date record. 

MEMORY FLIPPED a Boolean quantity only used by the system. 

DISK FLIPPED a Boolean quantity only used by the system. 

There are two unused bytes at t.he end of t.he 
directory header entry. 

2.6.2 Directory Entry for a File Entry 

If the FILE KIND field in the directory entry indicates that 
this entry is any sort of file, the layout of the entry is as 
follows: 

FILE JJAME is a 16-byte field containing the file name. 
The first byte contains the length of the field 
- the remaining 15 bytes are the characters of 
the file namm . 

LAST BYTS is a word quantity which is the number of bytes 
in the last bloclc of the file. 

LAST MODIFICATION DATE 

is a word quantity containing a date record 
representing the last time that this file was 
changed. 

The diagram below illustrates the layout of a single directory 
entry. The first section is common to all :<ind3 of directory 
entries. Then the entries on the left hand side correspond to a 
directory header entry and those on t-he right hand side 
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correspond to a file entry. 



Byte 



.> +0 

+2 

+4 



?1HST BLOCK 
NEXT BLOCK 

FILE KIND ONCSED 



+6 
+14 



+16 



+13 
+20 



DISK VOLOME tIAME 





LAST BLOCK 


1 




NUHBEH OF FILES 


1 




LAST ACCESS 


1 



LAST BOOT 



FILE NAME 



■+■ 



i|-i- -■■ 



+22 I MEM FLIPPED | DISK FLIPPED | 

t.. » ..i.. . ■ ■— .-»,i. (.- ■ II I. ■ ■ I. .1- I ■+. 

+24 I UNUSED I 



LAST BYTE 



LAST ACCESS 



+22 
+24 






— + 



Figure 2-3 
Layout of a Directory Entry 
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2.7 The Device or Unit Table 

The Device (or Dnit) Table contains the tnaximum number of 
devices in the first word of the table. The remainder of the 
table consists of an entry for each particular unit. The overall 
layout of the unit table is as shown in t.he diagram below. 



ayte > I Maximum Mumber of Devices i 

+2 I Entry for Device | 

+20 I Entry for Device 1 | 

+33 I 
and so on until ... ' 

+nn I Entry for Device MAXDEV | 



Figure 2-4 
Overall Layout of the Device Table 

Each entry in the unit table contains the following 
information: 

VALID OPSHATION 3 ITS 

a word quantity which contains a bit-map that 
with bits "on" to specify those operations t.hat 
are valid for this device. The bits in the 
first word in each entry have the following 
laaanings: 

1 this unit can perform a ONIT^IEAD 
operation. 

2 this unit can perform a ONITWRITE 
operation. 

4 this unit can perform a 0NITCL2AK 

operation. 
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this unit can perform 
operation. 



ONITBUSY 



this unit can perform a ONITSTATUS 
operation. 



ADDRESS OF DRIVER 

is a long word pointer to the driver code for 
this device. 



BLOCKED 



MOUNTED 



DEVICE NAME 



DEVICE SIZE 



a Boolean which when true, indicates that this 
is a bloclced device. 

a Boolean which when txu*, indicates that this 
device is mounted (a driver is assigned to it) . 

an eight-byte field which is the name of the 
davice. The first byte is the length of the 
string; th« remaining seven bytes are the actual 
nana of the device. 

is a word quantity which is the number of 
512-byte blocks on this device. ?or an 
unblocked device, it is set to the mcucimum 
integer, 32767. 



The layout of each entry in the devica table is 
below . 



as shown 



Offset +0 I Valid Oparation Bits 

H ■ ■ ill.- .-- . .I. . .- ■ . I. - I ■- — ■ — ■ 

*2 I Pointer to Driver Routine 

>6 I BLOOCSO I MOOfirrSD 

■^9 Davlea Haa* occupies 

eight bytes 

I ..I I I- - .1 — „ ». ——— . - . -i — i-.— .4- 

-••16 I Device Size I 



Figure 2-5 
Individual Device Table Entries 
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2. a Input Output Result Codes 

The lORESULT field in the System Conununioation Area contains a 
result code every tiae some input-output process is completed. 
The table below describes the codes and their ineanings. 

Q Good result. The operation completed 

successfully. 

1 Bad aiocic. Usually due to CRC error on di3i< 
read. 

2 Slther a bad unit number, or there is no driver 
implemented £oc t.his unit. 

3 The requested input output function is not valid 
for this device. For example, bloclc write to 
the iteyboard. Also happens when attempting to 
open an already open file. 

4 Nebulous Hardware Error. 

3 Lost Device - a previously accessed device went 

offline. 

9 Lost File - a previously accessed file has 

disappeared from the file directory. 

7 Invalid File tlame. 

3 No room left on the device for the file. 

9 this usually indicates something diastrous 
occurred while doing the input-output - the 
device is off-line, for example. 

10 Mo File - the named file does not exist. 

11 Duplicate File - attempt to rewrite a file that 
already exists. 

12 File is Already Open - An attempt to open a file 
that is already open. 
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13 File Not Open - Attempt to operate on a closed 
file. 

14 Bad Poemat - Non-numeric data read in an Integer 
oc Real read operation. 

15 Ring Buffer Overflow. 

16 Write Protect - attempt to write to a write 
protected device. 

17 Seek Error - Seek on a file that is not a text 
file or a blocked file. Also seek to a negative 
record number. 

54 Device Error of unknown origin. 
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2«9 Mamocy Layout under MERLIN on the 68000 



Top o£ Memory 



MEBLIN Kernel Code 

Shell 

Process 1 
Process 2 
Process n 



Pernanantly Resident Code 



Kernel Qlobals | 
Kernel Staclc I 



I Shell aiobals 
I Shell Stacic 



Process 1 Slotaals and Staclc 

Stacic 

I 
7 



— ^ 



SIOOO > 



$130 
$100 







Pointer to SYSCOM Area 
Trap Vectors 



Figure 2-S 
Memory Layout in MERLIN 
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2.10 Register Usage in MERLIN ,, ' 

Registers A4 .. a7 are reserved for system use as follows: 

A4 holds the address of the overlay jump table. 

A5 holds the address of the user global data. 

A6 holds the base address of the local staclc 

txaxM^ A6 is undefined for a procedure at the 
outermost (main) level. 

a7 holds the current stack top address. 

All other registers are CLOBBERED when system calls are made. 



2.11 Environment of A Running Program 



The diagram below shows the run-time environment pointed to by 
register A5. 



(AS) +20 
(AS) +16 
(AS) +12 
(A3) +8 
(AS) +4 
(AS) > 



ABiGC (argun«nt count) 



AJRGV (point to Arguments) 



Pointer to Standard Output 



..m^^ 



Pointer to Standard Input 



Return Address 



Old Copy of A3 



Figure 2-7 
Environment of a Running Program 
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Chapter 3 
Systea Calls 



This Chapter provides a blow-by-blovr description of the system 
call interfaces. In all cases ^ parameters are described in the 
order in which they must be pushed onto the stack. The last 
thing pushed onto the stack/ in all cases, is the return 
address. The discussions below cover the following topics: 

. Unit input-output. 

. File input-output. 

. Memory Management. 



3.1 Onit input-output 

Unit input-output is at the lowest level of the system 
iaput-output facilities. Unit input-output references the 
physical devices in terms of physical blocks (on a disk} . There 
are five systea i nte rfaces for unit input-output, namely 
nSITSSAOr ONITWRZTS/ ONITBUSTy ONITCLSAA stnd ONITSTATUS. They are 
described in the subsections that follow. 

3.1.1 aniTfiEAO and OlflTWItXTS - Oirect^ Unit Data Transfer 

UNITSEAO and ONXTWRITS are used to transfer information between 
a memory buffer and a specific unit. Parameters are: 

unit ntimber a word quantity representing the physical unit 
number involved in the transfer. 

buffer address a long word pointer to the memory buffer. 

byte count a word quantity representing the number of bytes 
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to be transferred. 

bloclc number a word quantity representing the physical block 
number to be r^ad or written. In the case of 
character devices such as the keyboard or 
. ' printer, the block number is ignored. 

mode a word quantity which is driver dependent. For 

example, in the UCSD Pascal system, one of the 
functions of mode is to inhibit special 
treatment of space compression indicators in the 
byte stream as it flies through the driver. 

3.1.2 ONITBUSY - Check if Unit is Busy 

UHITBCS? can be called to determine if the unit is busy, that 
is, whether it is ready for data transfer. Parameters are: 

unit number a word quantity which is the number of the unit 
involved . 

ONITBUSY returns a result on the stack top. The result is a 
Boolean quantity which is txu« if the unit is busy, false if not 
busy. 

3.1.3 TOITCLEAH - Reset a Unit 

ONITCLEAA is called to "reset" a unit to a known initialized 
state. Parameters are: 

unit number a word quantity representing the number of the 
unit to b« cleared. 

3.1.4 ONITSTATTJS - Return Status of Onit 

UNITSTATUS is a catch-all procedure which, in addition to 
returning the status of the specified unit, can also be used to 
change unit parameters. Parameters are: 

unit number a word quantity representing the phsyical unit 
number involved. 

buffer address a long word pointer to the buffer used for 
transferring information between uitlTSTATUS and 
the caller. 
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control a wocd quantity cepceaenting a control parameter 
^~~~~~ vhoam naaning is agreed upon between onitstatUS 
and any of its callers. 



3.2 File input-output 

This Section describes those facilities that deal with files. 
In ocdec to us« th« ?ile input-output facilities, it is 
n«cc«ssary to allocate a ?ile Information BlocJc (FIB) . See 
Chapter 2 for the details of an FIB. If Blociced input-output is 
being used, a buffer must also be allocated for the data transfer 
operations. The buffer oust be big enough to hold the number of 
bloclcs to be transferred at any time. 

3.2.1 FINIT - Initialiae a File 

FINIT seta up a Pile Information Bloclc when the file is 
opened. The Open File function (FOPEN) usually calls upon FINIT 
to do this, aaer programs do not normally need to call FINIT. 
Parameters are: 

Pointer to FIB a long word pointer to a File Information Bloclc . 

bytes in a record 

" a word quantity. There are special meanings 
attached to this parameter if it is zero or 
negative. If positive, it represents the number 
o£ bytes per record in the file. If zero or 
negative, it has the following meanings: 

this file is an interactive file - 

it. is talking to a device such as a 
terminal. An interactive file is to 
all intents and purposes the same as 
a text file. There are some minor 
differences in the way that 
end-of-line is handled. 

-1 this. file is a OCSO Pascal 

competible file. It is normally 
declared as just file; (an untyped 
file) , as opposed to a file of 
aamm type;. V7ith this file 
organization, the user must provide 
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th« buffer. aioclc input-output can 
only b« done to such a file type. 
See the Subsection on Block 
input-output later on. 

-2 this file is an ISO Standard Pascal 

compatible file. That is, a file of 
t«zt ; . 

3.2.2 ?GET and F?nT - Transfer File Data 

FGET and F?UT are considered together, since the calls are 
identical except for the data transfer direction. There is only 
one parameter: 

pointer to FI3 a long word pointer to a File Information Block. 

3.2.3 FOPSN - Open File 

FOPSN "opens" a file ready for data transfer. Parameters are: 

Pointer to Filename 

a long word pointer to a character string which 
represents the namm of the file to be opened. 
The maximum number of characters in a file name 
is 24 at present. This is composed of a 
seven-character volume name enclosed between 
slash characters "/", followed by a 15-charactar 
file name. 

Pointer to Fia a long word pointer to a File Information Block . 

Mew File Indicator 

a Boolean quantity which, when txu«, indicates 

that this is a. new file, and when false, 
indicates that this is an existing file. 

3.2.4 FCLOSE - Close File 

FCLOSZ closes a file and severs the relationship between a 
program and a file. It flushes out any buffers. FCLOSZ also 
disposes of the file in a manner determined by the mode parameter 
described oelow. Parameters are: 

Pointer to FI3 a long word pointer to a File Information Block. 
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Moda a word quantity indicating the disposition of 

th« £ile after it is closed. The modes are: 

nomal -> if the file is an old file 
- it existed prior to this program 
run, it is saved (retained) in the 
file system. If. the file is a new 
file - created during this program 
run, it is deleted or purged from 
the file system. 

1 locic - makes a file permanent in the 
file system, regardless of any 
conditions mentioned in case (0) 
abovm, 

2 purge - purges or removes this file 
fron the file system when the file 
is closed. 

3.2.5 HEADCHAa - Read a Character from a File 

HBADCBAR reads a single character from a file. READCHAA only 
applies to interactive (mode 0), oc text (mode -2) files. 
Parameters are: 

Pointer to FIB a long word pointer to a Pile Information aiocJt . 

RE21DCH^R returns a single byte value on the top of the stack. 

3.2.6 WHZtSCHAR - Write a Character to a File 

WSITZCOLR writes a character to a file. There is a field width 
specification which can cause space filling. WRlTHCaAR only 
applies to interactive (mode 0}, or text (mode -2] files. 
Parameters are: 

Pointer to FIB a long word pointer to a File. Information Block. 

Character to be' written is a byte . 

Size a word quantity representing a field width. If 

size is greater than one, the character is 
preceded with size— 1 spaces. 

3.2.7 SZSS - Position to a Specific Record in a File 



HESLIM 1.0 Interface Guide ?age 29 



System Calls 



Chapter 3 



SEEK poaitiona a ffile to the start of a specific record. it is 
intended for use in random file addressing situations. For a 
text file, it poaitiona to the specified byta in the file. The 
position is absolute within the file, not relative to the 
previous position. Parameters are : 

Pointer to FIB a long word pointer to a File Information 31oc!< . 

Record >Tumber a long word quantity representing the record to 
position to. Records are numbered from 0. 

3.2.3 3L0CX10 - Blocit input-output 

BLOCKIO (Blocic oriented input-output) is used to read or write 
whole bloci«s on a file. BLOCKIO only applies to untyped files - 
files created in mode -1. The blocks in question are physical 
disk blocks. In MEIlLIN's universe of discourse, blocks are 312 
bytes. Parameters are: 

Pointer to FIB a long word pointer to a File Information Block. 

Pointer to Buffer 

a long word pointer to a buffer containing the 
data to be read or written. 



Block Count 



a word quantity representing 
blocks to be tranaf erred. 



the number of 



Block Mumber 



a word quantity repreaenting the block number at 
which to start the transfer. Blocks are 
numbered from zero. 



Read or Write Indicator 

a Boolean quantity indicating a Read when true, 
or a Write when fala«. 

Block input-output returns a word quantity on the stack top. 
If the value is non-zero it is the number of blocks actually 
transferred. It is important to note that this value may not 
always be the same as the number of blocks requested - this 
happens when an end-of-file is encountered. If the value is 
zero, it indicates some form of error, in which case lORESULT 
should be read from the System Communication Area and checked for 
an error code. 
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3.3 Memory Managemant 

This section describes those MERLIN system calls dealing with 
dynamic allocation and de-allocation o£ memory. Memory 
Allocation is done on a heap . The heap grows upward from the end 
of the user program. The user stack grows downward from the top 
of memory. When the two collide / there is mutual annihilation. 

3.3.1 MEW - Allocate Storage- 

NEW allocates storage on the heap. Parameters are: 

Pointer to Storage 

a long word pointer which points to another long 
word pointer. The second pointer receives the 
start address of the allocated storage , in the 
even^ that there is enough storage to allocate. 
Mote that ilEW always returns a pointer that is 
aligned to a word boundary. 

Byte Count a word quantity representing the number of bytes 
to b« allocated. Not» that if an odd number of 
bytes are requested, NEW rounds up to an even 
(word) number and allocates that number of 
bytes . 

3.3.2 0IS70SS - De-Allocate Storage 

DISPOSE currently acts as a no-op. It does not actually 
di.spos« of de-allocate storage as in some Pascal 
iaplementations. DISPOSS does* however, return a NIL pointer to 
the caller. Parameters are: 

Pointer to Storage 

a long word pointer that itself points to 
another long word pointer. This second pointer 
is th* address of the region of storage to be 
de-allocated. 

3vte Count a word quantity representing the number of bytes 
to be freed. It must be the same number as that 
given to the NEW call as described above. 
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3.3.3 MAAK and RELEASE - Mark Heap and Relaaa« Heap 

MAIUC and ftSLEASE are used in conjunction to de-allo 
previously allocated storage. They are identical in t 
parameter requirements: 

Pointer to Storage 

a long word pointer that itself points 
another long word pointer. This second poin 
is the start address of the storage region to 
marlted or released. 

HASK is used to "remember" the current position o£ the top 
heap. RELEASE subsequently uses the point 
that MARX returns to cut the heap top back 
the previously MARK'ed position. 

3.3.4 MEMAVAIL - Determine Available Memory 

MEMAVAIL returns, on the stack top, a long word quantity whic 
is the number of free bytes available on the heap. 



3.4 GSTDia - Read a Directory 

GETDIR reads a directory if one is available. Parameters are: 

Pointer to Volume Name 

is a long word pointer to a string which 
represents the name of a volume whose directory 
is to be read. 

Pointer to Directory 

a long word pointer to an area of memory large 
enough to receive an entire directory. 

Device Blocked indicator 

is a long word pointer to a Boolean quantity 
which is set tzu* if the device is blocked 
device. 

Device Number is a long word pointer to a word quantity which 
is set to the device number . 
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Deviea la Valid Indicator 

a long word pointer to a Boolean quantity which 
is s«t to true is the device named by the first 
parameter above is actually on the system. If 
this parameter is assigned the value false, none 
of the previous three parameters are defined. 

The interpretation of the various parameters of GZTOIH is as 
follows ; 

. If Device- is -Valid is false, the device named by the first 
parameter is not on-line. In this case, none of the other 
pareuneters are meaningful. 

. If Device- is -Valid is true. The Device-Number parameter is 
assigned the number of the unit associated with that volume. 

. The Device-Blocked parameter is set to false if the device is 
not a bloclced device (such as the /printer) . In this case, the 
Directory parameter is meaningless. If the Device- Blacked 
pareunetar is set to true, the device is a blocked device, in 
which case the Directory parameter contains the directory read 
in from that volume. 
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Chapter 4 

Welting a Onit Driver 



This Chapter diacuaaea the baaic concepts of writing a unit 
driver Cor MEHLIU/ then shows an example at such a driver written 
in 63000 assembler code. 



4.1 Calling Conventions 

Unit driver parameters are passed in registers, as follows: 

DO.w qnit number . This parameter is useful for 

validity checlcing where a given unit driver can 
have more than one logical device assigned to a 
single physical unit (such as a dis)<) . 

DLL Address of Buffer to or from which the data 

transfer Ts to be made. 

D2.W Mumber of aytes of data to be transferred. 

D3.W Block number at which the. transfer is to start. 

This is only applicable to bloclted devices. 

04. w Command determines what operation (nnitHead, 

OnitSusy and so on) , that the driver is to 
perform. This parameter is described in detail 
below. This parameter is the only valid 
parameter passed to unit-clear or unit-busy. 

DS.w Mode is device dependent and controls operations 

such as whether data compression characters are 
to be recognized. 

The result of the ooeration (lORESULT) is returned in register 
07. W. 
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4.1.1 Unit Orivar Command Parameter 

The Command passed in register D4.W describes what operation is 
to ba par formed. The command values are summarized here and 
described in greater detail below. When a given driver gets 
control, the caller has already verified (from the unit table) 
that this command is valid for this particular unit driver. The 
values of the command are: 

Install the driver - perform any required initialization. 

1 Read from the unit. 

2 Write to the unit. 

3 Clear the unit - reset it to its initial state. 

4 Test if unit is busy. 

5 Return status of unit. 

6 Unmount the unit. 



Install 



When MESLIN installs a unit, either at boot time 
or when a unit is explicitly assigned, it is 
called with the install parameter. The unit can 
perform any initialization code neccessary to 
set up cyclic buffers, place interrupt vectors 
and so on. 



Read and Write Are self-explanatory 
Clear 



Busy 



Status 



Unaount 



clear pending 
Check i£ the unit is ready for data transfer. 



Initializes the device 
interrupts and such. 



Return the status of the unit, 
is device dependent. 



This operation 



anaount the unit. This is called when the unit 
is re-assigned a new driver or is de-assigned. 
At this time the unit driver should perform any 
clean up or restoring of interrupt vectors that 
might, be neccessary. 
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4.2 A Sample Unit Driver 

The code below shows an entire unit driver with explanatory 
notes interspersed. The driver represents a model to be followed 
in broad outline rather than slavishly. Hote the use o£ a table 
off sel'-celative addresses which the driver uses to jump to its 
various sections. A driver organized in this way can be Located 
anywhere in memory and is independent o£ location. 



IDENT COtTRTIiRI 

GLOBAL OARTDRIV 

OARTDRIV - The NEC PC7201 UAHT Unit Driver 

Parameters: DO.w - Unit Number 

01. L - Address o£ Buffer 

D2.W - Count 

03. H - Bloclc Number 

04. ;« - Commsuid 

OS.M' - Access Mode 







Input 


Parameters: 


Result values: 


Command 


Unit 


Addr 


Count Block Mode 


ICRESULT 


Busy 


- Install 


00. w 






07. W 




1 - Read 


00. w 


01. L 


02. W 03. W D5.W 


07. W 




2 - write 


DO.W 


01. L 


02. W 03. W 05. W 


D7.W 




3 - Clear 


00. W 






07. W 




4 - Busy 


00. w 






07. W 


00. B 


5 - Status 


00. w 


01. L 


02. W* 07. 


W 




6 - Unmount 


DO.W 






07. W 





To interpret the table above, the unit number for this driver 
is always passed in register 00. W. All commands always return an 
lORESULT in register 07. w. UNITBDSY, for example, is the only one 
that passes a result bacit in register DO.B. The ONITREAD, 
UUITWRITS and UNITSTATUS commands all expect a buffer address in 
register 01. L and a byte count in register 02. W. 

In the case of the Status command, the value in register 02. w 
is a control parameter and not a count. 
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The n«xt piec« of code is the entry for a unit driver, 
illustrating how the various sections of the driver are called 
depending on the specific command. 



UAKTDRIV 



nSSTABL 



Entry point for the OAaT Driver 



lORESULT 



CLfl.W 


D7 : 


10] 


MOVE.L 


01, AO 


AO 


LSA 


ORrrABL,Al 


Al 


LSL,V 


#1,04 


04" 


MOVB.W 


0(A1,D4.W) ,04 , 


04 


JMP 


0(Al,O4.W) 


' Go 


UXSA.Vf 


URTINST-UA'l'i'ABI 


* ; 


DATA.W 


ORrSD-ORTTABI. 


1 


OATA.W 


ORTWR-OSTTAflL 


; 


OATA.W 


OBTCLa-ORTCABL 


• 
f 


OATA.W 


aRTSSY-ORTTABt. 


• 
/ 


DATA. {7 


ORTST-URTTABL 


• 


OAXA.tf 




:• ; 



» Data buffer address, 
s Bas« address of offset table 
" Command*2 for word count. 
- Offset from ORTTAflt.. 
Go to appropriate driver. 

Install driver. 
Read from aART. 
Write to OART. 
Clear QART. 
Test if Susy. 
Return status. 
anmount driver. 



The nex-t few code sections illustrate the entry points and give 
a broad view ofi the operations performed. 



Constants to define the QART base addresses. 



UARSA 


son $€aoooo 




OART 


UABTAC 
> 


SQU $600002 


; 


aART 


ORSINST 


HOVS *OABXAC,A0 




• 




M0VB.3 #13, (AO) 




; 




MOVB.a #13, (AO) 




; 




MOVE. a #2,(A0) 




; 




.... oore code to 








.... initialize 


the 


OART 




ars 




i 


7 

; 









VBSVmKS 



RTS 



UART A data register. 
aART A command register. 



ORTINST - Install the Driver. 
AO :• aART A control register. 
Select register 0. 
Reset the whole aART. 
Select register 2. 



Return to the caller. 



; ORTTJOTCT - Unmount the dr iver . 
; Nothing to do in this driver. 
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Chapter 4 



awrSxit 



Read character (s) from UART A. 
Any more characters wanted ? 
No - return to caller. 
DO :■ OAHT Status register. 
Ch«clc if receiver full. 
NO - wait until it is. 
Yea - move character to buffer 
Go for next character. 
Finished - return to caller. 



URTWR - Write character (3) to OART A. 

Any more characters to write ? 
BMI.S awrExit ; No - return to caller. 

.... remaining logic similar 
.... to ORTRD except for 

.... direction of transfer 
RTS ; Finished - return to caller. 



ORTSD 




; ORTRD 


DrdLoop 


SUBQ.W 


*1,D2 




BMI.S 


OrdExit 


ardBuay 


MOVE . B 


OARTAC.I.,D0 




AN0I.3 


*1,D0 




3EQ.S 


DrdBuay 




MOVE . a 


UARTA.I,(AO) + 




BRA.S 


OrdLoop 


ardExit 


RTS 




ORTWR 




; URTWR 


UwrLoop 


SOBQ . W 


i»l,D2 



ORTCLR 



MOVE.B 

RTS 



aARTA.L,00 



ORTCIJl - Clear the OART driver. 
Read character if present. 
Return to caller. 



0RT3SY 



MOVE.B 

ANDI.W 

SNE 

NEG.B 

RTS 



aARTAC.LfDO 

*1,D0 

DO 

DO 



URTBSY - See if character available. 
DO :• QART status register, 
Chec)c if receiver full. 
Make condition code into .. 
... a Pascal Boolean. 
Return to caller. 



CTRTST 



RTS 
END 



aARTDRlV 



aART Status - nothing to do, 
Return to caller . 

End of the whole driver. 
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Chapter 5 

lAtezfaca Definitions in Pascal 



This chapter shows the Pascal type definitions/ and the 
procedure interfaces r to MEKLIN. The information given here is 
the Pascal representation of the narrative information in the 
preceding Chapters. 



5.1 Basic Constant and Type Definitions 



Const: 








BLOCKS IZE 




512; 


7IDL2NGTH 




7; 


TIDLENGTH 




IS 


7 


MAXDin 




72 


; 


MAXSSV 




20 


? 


MAXJTABLE 




22 


; 


MAXUTABLE 




10 


r 


itAXSSlOCSSS 




10 


/ 


SYSCOMPLOC 




$0180; 


LOC0DEI.0C 




$0108; 


HICODELOC 




SOIOC; 


FMOSMAI. 




0; 


FCOCK 




1; 




?9t7RGZ 




2; 




FTRONC 




3; 





number of bytes in a dislc block 
nuaiber of characters in a volume name 
number of characters in a file name 
max number of directory entries/ volume 
max number of devices on the system 
number of entries in system call table 
number of entries in user call table 
max number of processes allowed 
System Communication Area Pointer 
Lowest memory location pointer 
Highest memory location pointer 

{ File disposition codes 



T7P« 

stringSO • stsingCSO]; 
dirrange • . . MA2CQZS; 

vid » string [VTDL2NGCT1 ; 
tid « string [TIDLEN<3TH] ; 
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fileltind - (UNTYPEDFILS, XDSKFILE, CODES'lLZ , TSXTFILE, INFOFIL£ , 
DATAFILil, GHATFILE, FOTOFILS, SECURDIR) ; 
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S.1.1 Layout of the oats Recocd 



T7P« 

daterec 



packed record 

year ; . . LOO ; 

day : .. 31; 

month : . . 12 ; 
end; 



100 ■> temporary file } 
«> date not meaningful } 



5.1.2 Layout of a Directory Entry 



Typ« 

direntry « 

paekad recocd 

f Irstblocie : integer ; 
ncxtbloek : integer; 
status : boolean; 
filler i .. 2047; 
case fkind : filekind of 
SBCURDIR/ ONTYTSOFILS : 
(dvid : vid; 
deovblock : integer ; 
dnumf il ea : integer ; 
dload timet integer; 
dlastboot; daterec) ; 
MemPlipped: Boolean; 
Osk?lipped: Boolean; 
X0SK7II.Z, CODEFILS, TZXT7ILE, 
niTOTILS, DASA7ILS, G!tAF?ILSr 
FOTOFILa: 

(dtidt tidy { title of file 

dlastbyte: 1 .. BI.OCKSIZZ; ( bytes in last block 
daceessi daterec) ; { last modification date 
end; 

directory > aczartdirrange] of direntry; 
pdirectory • "directory; 



disk volume name 
last block of volume 
number of files 
time of last access 
moat recent date setting 
XB0E if flipped in memory 
TBXJZ if flipped on disk 



devrange • .. MilXOSV; 
byte ■ -128 . . 127 ; 
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bytes • arraytO .. 9999] of byte; 

pbytes « "bytes; 

ppointar « "pbytes; 

string32 « stringC32]; 

string64 ■ s-tring[641; 

patring64 ■ "string64; 

str64rec ■ record s:3tring64; and; 

pstr64rec; « "str64cec; 

atringtable * arxayCl .. LOO] of pstr64rec; 

pstringtable « "string table; 

addrtable ■ arrayEO .. MAXJTABLZ] of pbytss; 

paddr table ■ "addrtable; 

uaddrtable « arxayCQ .. MAXUTABLS] of pbytas; 

puaddr table ■ "uaddrtable; 

nemrec • record lodata: longlnt; 
hidata: longint; 
locode: longlat; 
hicode: longint; 
b tdev : InHagcr ; 
end; 
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S.1.3 Fila Intarfaca Slocic Definition 



tYP« 
pfib - *fibj 

fib « cacocd fwindow: pbytes; 
FEOL^r : Boolaan ; 
FEO F; Boolaan; 
FTS2CT : Boolaan ; 

fstata: (FT7ALID, FIEMSTY, FIVAI.ID, FTEMPTY) ; 
fracsiza: iatagar; 
CUM FIsOpan: Boolaan of 
txutt: (FIslloclcad: Boolaan; 
funit: intag«r; 
fiTids vid; 
frapaatcount, 
f nax-tblock , 
faaxblocic: in-tag«r; 
FModifiad: Boolaan; 
fhaadac: dixantry; 
aasA FSoftBuf: Boolaan of 
tzuar: (fnaxtbyta, faaxbyta: intagac; 
FBuf Changed: Boolean; 
fbuffar: arrayCQ. .511] of byte; 
fuparcow: integer) ) ; 
end; 
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3.1.4 System Connnunication Area Definition 

typ« 

ptext » "text; 

syscorarec - record sioresult: integer; 

pcocassno: integer; 
freeheap: pbytas; 
j tabl a : paddr tabl e ; 
sysout: ptext; 
sysin: ptext; 
sysdevtab: pdevtable; 
pdirname: p3tring€4; 
atable: puaddr table; 
today: daterec; 
codejtaddr: longlnt; 
nextpcono: integer; 
nunpcoa : integer ; 
protable: ppcoctable; 
pbootname: pstring64; 
mesmiap : "raemr ec ; 
boo tde V : integer ; 
end; 

5.1.5 Layout of the Device Table 



Type 

devrange ■ .. .MAXDEV; 

pdevtable » "davtabcac; 

devtabcac « record aaxdevno: integer; 
dt: array [devrange] of 

record connds: integer; 
driver: pbytas; 
Slocked: Boolean; 
Mounted : Boolean ; 
devname: vid; 
devsize: integer; 
end; 
and; 



5,1.6 Layout of the Process Table 
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pprocrec • ''procrec; 

procrec ■ record d; array [0 .. 7] of longint; 

a: array [0 .. 7] of longint; 
no : integer ; 
end; 

pproctable » "^proctable; 

pcoctable ■ array [0 .. MAXPHOCSSS] of procrec; 
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3.. 2 Procedure Interfaces in PASCAL 

5.2.1 anit Input Output 

Ptocsdure ONITBEAiS ( uni tno : Integer; 
buffer rpbytes; 
count: Int»g«r; 
bloclcno: lnt«g«r; 
mode: Integer) ; 

:h:ocedur a UNITWRITS ( on i tno : Inl:eg«r ; 
buffer tpbytes; 
count : lnt;ag«r ; 
bloclcno: Integer; 
mode: Intager) ; 

Procedure ONITCLZAiKunitno: Integer) ; 

FOBCtlon aNITBUSY(unitno: Integer) : Boolean; 

iProcedure ONITSTATUS (unitno: Integer; 

▼ar buffer: pbytes; 
control: integer) ; 

Procedure aiOINlT; 
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S.2.2 ?ilft Input Output 

Pcoeadurtt FINIT(f: pfib; recbytes: integer); 

procedure ?GS7(f ; pfib) ; 

procadnre PPUTCf : pfib) ; 

procedure FOPEN ( f pathname : pstring64; 
f: pfib: 
NewFlag: Boolean) ; 

procedure ?CLOSZ(f : pfib; Saode: integer) ; 

fuaetioD TREAOCBAiKf : pfib) : byter 

procedure FWRlTSCHAKCf : pfib; ch: byte; fsize: integer) ; 

pro ca dn r e ?SEBX(f: pfib; Sracno: longint) ; 

function BLacsiQ(f: pfib; 

fbuff: pbytss; 

fblockSTf fbock: integer; 

ReadFlag: Boolean) : integer; 
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Chapter 1 
Introduction 



The Linker and Library utilitieg are a pair of complementary 
programs which aid in the process of generating executable 
programs under the MERLIN operating system. 

The Linker links or binds relocatable object-code modules, and 
optional modules from libraries, to form a program which is 
executable. 

The Library utility builds a library from relocatable 
object-code modules. Such a library can contain frequently used 
procedures (such as the mathematical functions of FORTRAN) which 
can be used in subsequent link processes. 



1.1 auildinq an Executable Program 

To get from the source text of a program to an executable 
object code file, the user must proceed as follows: 

1. The source file is compiled or assembled. The result of 
compiling or assembling is a self -relocatable object-code 
file, along with listings and error diagnostics. This 
process continues until a "clean" compilation or assembly 
is obtained. 

2. The relocatable object-code is linked, possibly including 
run-time support libraries, to generate executable code 
into a disk file. 

3. The program can then be run (executed) on the machine 
simply by typing its filename. 

The following chapters in this manual describe the Linker and 
Librarian object-code management system. 
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1.2 Overview and Lavout of this Manual 



Chapter 2 covers the Linker, its use, options and Jiessages, 

Chapter 3 describes the Library management utility and how to 
use it to build a library of relocatable object-code modules. 

Chapter 4 is a detailed description of how object-code files 
are constructed, together with details of the various types of 
blocks that go to make an object-code file. 
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Chapter 2 
Clinker 



The Linlcar is a utility which accepts files of relocatable 
object-code generated by the various compilers and assemblers, 
plus library files generated by the Library utility, and links or 
binds those into a form suitable for execution. 

The Linker can also perform a partial link, where a collection 
of relocatable object-modules is bound into one file that can be 
used in future linking operations. This is described later on in 
this section. 

AS well as binding" together relocatable modules from various 
language processors, the Linker can search libraries of commonly 
used functions, (such as the PASCAL run time environment) , and 
link those modules that are referenced into the final loadable 
output file. 

In order to link relocatable modules into an executable 
object-code file, the Linker needs the following pieces of 
information: 

. The optional name of the listing file where the Linker messages 
and memory map information i3 to be listed. If no listing file 
name is given r no memory map information is generated. 

. The name of the object-code file in which to write the final 
linked output. 

The name(s) of the file(s) from which the relocatable 
object-code is read. 

. A list of one or more libraries which are to be used to satisfy 
external references within the object-code file. 

A typical Linker run is shown below. Linker responses are in 
bold face text, and user . input is underlined . 
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Sxample of Linker Usage 

% linker 

LINKER - MCSaooO Object Code Linker 

20-Jui-81 

(C) 1981 Silicon Valley Software, Inc. 

Listing File - /console 
Output fileC.OBJ] - myproglinked 
Input file [.OB J] - mypcoq 
Input file [.OBJ] - paslib 
Input file [.OB J] - 

..... Lots of Linker Messages 

% 



The- Linker keeps prompting for more "Input files" until an 
empty line (carriage return) is entered. This enables the entry 
of a whole list of libraries as places from which to satisfy 
external references. The last one entered is usually the name of 
a cun-time library (PASLIB in this example). A ".obj" suffix is 
added to all input filenames if it is omitted from the filename 
when entered. . 

If the- Linker cannot find a specific input file, it displays .a 
message to the affect: 

*** Warning - Can't open input file *** 

and repeats the prompt for an input file. The incorrect filename 
is simply ignored and the link can be completed with no adverse 
consequences. 



2.1 Linker Options 

Linker options are supplied on the command line when the Linker 
is called up. Linker options are introduced by a "+" sign, a "-" 
sign, followed by a letter, or a "?". The options are as follows: 

? Display status information. 

q The -q option disallows quick-load format for the executable 
object-code file, and forces overlay format. The +<i option 
(the default) allows quick-load .format. 
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u The +u option Lists uncefaranced entry points. The default is 
-u. 

a The +ni option prints the memory map in the order in which 
modules are linked. The default is -m. 

a The +a option prints the memory map in alphabetical order. The 
default is +a. 

3 The +s option prints symbols that start with the "%" sign. 
Such symbols are used for compiler generated symbols. The 
default is -s or do not print "%" symbols. 



2.2 Linker Error Messages 

The Linker can display various error messages in the course of 
its operation. The error messages are self-explanatory. There 
are three grades of error messages, with different outcomes: 

Warnings are correctable errors. The error can be 
corrected and the link proceeds. For example, 
misspelling a filename will result in a message 
to the effect that the file cannot be opened, at 
which point the filename can be retyped. 

Errors are correctable in - that the user can proceed 

with the link process, but the generated 
object-code file is not created properly. 

Fatal errors are those from which the Linker cannot correct 
or recover. In those cases the linker returns 
ta the shell. 



2.3 Partial Linking 

As mentioned above, the Linker can perform a partial link, 
where the final output is not neccessarily executable, but a 
collection of separate relocatable object-code filss can be 
combined into one file. The resultant file can then be used as 
an input file in subsequent link operations. The output of a 
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partial link can have unsatisfied external references. 

If, for any reason, the linked object file has not had all its 
external references satisfied, the linker displays a message to 
the effect: 

The output is not executable 

This message appears when external references are not satisfied. 
It may mean that a program was missing some subroutines from a 
library (maybe the user forgot to include the library in the link 
process), or it also can appear when doing a partial link, in 
which case the message is to be ignored, since the full link will 
be done at a later date. 
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Chapter 3 
Library atility 



The Librarian binds compiled or assembled relocatable 
object-coda modules into a collection called a library . The 
purpose of a library is to provide a repository for commonly used 
object modules that have to be present when linking (see the 
Linker description) / such that the common modules and up bound 
together into the final executable code module. 

The library utility typically wants the following pieces of 
information form the user: 

. The name of the file which is to receive the listing (results 
and log) of the library process. 

. The name of the file which is to contain the generated library 
when the library generation process is complete. 

. The narae(3) of fil9(3) (with the .obj) suffix, which contain 
the constituent parts of the library to be generated. 

A tyisical Librarian session appears below. Note that Librarian 
responses are in bold face text and user inputs are underlined. 

% library 

LIBRAar - MCSaOOO Library Otility 

20-JU1-81 

(C) 1981 Silicon Valley Software, Inc. 

Listing file - /console 
Output Pilaf.QBJl - bodleian 
Input file[.OBJl - booksheit 
Input fileC.OBJl - stacks 
'T!/'iok°S^iiiteresting Librarian messages 



-.• J ..K«» an«<-ifiad input file it issues 
If the Librarian cannot find the specified inp 
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a message to the effect: 

The file 'whatever .obj ' can't be opened 
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Chapter 4 
Object File Fonnats 



This chaptar describes the layout of the object-code files that 
the Iiinlcer and dibrarian can process. The various code blocks 
are described in sufficient detail that a compiler writer can 
generate object-cods that is acceptable to the Linker and 
Librarian. 



4.1 Notation Used to Describe Object File Formats 

The symbol "::»" is read as "defined to be". Where a whole 
list of objects appear to the right of a "pile" of "::■" signs, 
it implies a choice of any of the objects. 

Objects enclosed in "angle brackets", "<" and ">" are syntactic 
objects which are defined in terms of other objects. 

An object followed, by an asterisk sign, "*", can be repeated 
'zero to many times" (the list of objects can be empty) . 

An object followed by a plus sign, "■♦•", can be repeated "one to 
many times" (there must be at least one of that object) . 



4.2 Linker File Layout 

This section is a description of the Linker File at the "top 
level" . 

<Link File> ::■ <Module Fila> 

::« <Library File> 
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<Mociule Ftl9> 
<Library Fila> 

<anit Fila> 
<Execute- File> 

<Module> 
<Other Bloclo 



;« <anit Fila> 

:» <Executa Flla> 

!« <Module>* EOF marlc 

:« <Libcary Module Bloc!c>-t- <Library Sntry 31ock> + 
<Modula>+ <Taxt 31ocl<>* EOF Mark 

:« <anit Block> <Module>-t- <Text 31ock> EOF Mark 

I" <Exacu table Block> <Module>* 
!« <Quick Load Block> 

1* <Modul« Name Block> <Other Block>+ <End Block> 

Entry Block 

Extacnal Block 

Start Block 

Code Block 

Relocation Block 

Conmon Relocation Block 

Conmion Definition Block 

Short External Block 

Data Initialization Block 

FORTRAN data area definition block 

FORTRAN data area Initialization Slock 

FORTRAN Data Area Reference Block 

FORTRAN Executable Data Area Initialization Block 

FORTRAN Executable Data Area Reference Block 



4.3 Byte Level Deecription of Linker Blocks 

All Linker and Librarian object-code blocks start with a single 
'identifier byte*. This block identifier takes values from 30 
(base 16) upwards. The choice of values greater than 30 (base 
IS) is an attempt to minimis* the probabLlity that a regular 
ASCII text file is mistaken for the start of an object-code 
block . 
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Object File Formats 



4.3.1 30 



Module ^TaIne Blocic 



oyts 



+— — — _ — h— — 1 + 

1 30 I size (3 bytes) 

4 module name 

(3 bytes) 

12 segment name 

(3 bytes) 

^._-.-._™_— +—_____-.+__-._ 1. — h 

20 I cslze (4 bytes) | 

24 I comments (24 .. size-1 bytes) ... | 



30 

size 

module name 
segment name 

csize 

comments 



Hexadecimal 30 indicates a Module Name Block. 

Number of bytes in this block. 

Blank padded ASCII name of module. 

ASCII name of segment in which this module will 
reside. 

Number of bytes in the code block for this 
module. 

Arbitrary information - ignored by the Linker. 
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4.3.2 31 - End Bloclc 



byte — > I 31 I size (3 bytes) | 

H -.—-.-. — !— _ — 4._____— H __+ 

4 I csiza (4 bytes) | 

+— _—— — +_ — _ -J. (. h 

31 Hexadecimal 31 indicates this is an End Bloc!<. 

size Number of bytes in this block - it is always 

000.008. 

csize Mumbsc of bytes in the code blocit foe this 

module. 
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4.3.3 32 - Entry Point Block 



byte — > 



32 

size 

linlc name 
usee name 
loc 

comments 



+ + + . + + 

I 32 I size (3 bytes) | 

+-.-.— - — (.———+-- — — — +— — h 

4 Link name I 

3 (3 bytes) ( 

12 user name 

(3 bytes) 

20 I loc (4 bytes) | 

+——■— — + — ———t~—— —t—-— — ~+ 

24 I comments (24 .. size-L bytes) ... | 

■t — — -—->— f— ————)— ———»■-»— ———)• 



Hexadecimal 32 indicates this is an Entry Point 
Block. 

Number of bytes in this block. 

Blank padded ASCII Linker name of entry point. 

Blank Padded ASCII user name of entry point. 

Location of entry point relative to this 
module. 

Arbitrary information - ignored by the Linker. 



Linker/Library Reference Manual 



Page 13 



Object File Formats 



Chapter 4 



4.3.4 33 - External Reference Blocit 



byte — > 



+ -„ +_ 

Q I 33 I 

+ +- 

4 

3 

12 






20 



24 



+ — 



+ — 



size (3 bytes) 

link name 
(3 bytes) 

usee name 
(3 bytes) 

re£ 1 (4 bytes) | 

cef 2 (4 bytes) | 



I each reference consumes 4 bytes | 
+ .■-.■ - ■ H ■ . ■ ■■- + ■ '■- ■ + -K 



+- 



.».+- 






lS+4*n 



ref n (4 bytes) 



33 Hexadecimal 33 indicates this is an External 

Reference Blocic. 

size Number of bytes in this block. 

link name Blank padded ASCII Linker name of external 
reference. 

user nam* Blank padded ASCII user name of external 
reference. 

ref 1 Location of first reference relative to this 

module. 

ref 2 Location of second reference relative to this 

module. 

. . . Other references. 

ref n Location of last reference relative to this 

module . 
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4.3.5 34 - Starting Address Blocic 

+-: h + + .+ 

byte — > I 84 | size (3 bytes) | 
+ . + + + + 

4 I start (4 bytes) | 

3 I gsize (4 bytes) | 

12 I comments (12 .. size-1 bytes) ... { 

84 Hexadecimal 34 indicates this is a Starting 

Address Bloclc. 

size Number of bytes in this bloclc. 

start Starting address relative to this module. 

gsize Number of bytes in the global data area. 

comments Arbitrary information - ignored by the Linker. 



4.3.6 35 - Code Block 



byte — > I 33 | size (3 bytes) 



4 I addc (4 bytes) | 

a I object-code (3.. size-1 bytes) ... | 

85 Hexadecimal 35 indicates this is a Code Bloclc. 

size Number of bytes in this block. 

addr Module-relative address of first code byte. 

object-code The object-code •- always an even number of 
bytes. 
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4.3.7 36 - 32-Bit Relocation BLoclc 



+—_ —+—.—___+_—— 1- --4. 

byte — > I 36 | size (3 bytes) | 
+ _—+______-._+-.__ 1. 1- 

4 I addc L (4 bytes) | 

12 I addc 2 (4 bytes) | 



16 I each addr consumes 4 bytes { 

I ^ :_;_•__ ^ i 

12+4*n I addr n (4 bytes) | 

36 aexadecimal 36 indicates this is a 32-bit 

Relocation Block. 

size Numbec of bytes in this bloclc. 

addr 1 Location of first address to relocate. 

addr 2 Location of second address to relocate. 

. . . Locations of other addresses to relocate. 

addr n Location of last address to relocate. 
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4.3.3 37 - Common Block Reference 



byte — > 



37 



12 
16 
20 



.+ + +. 

I size (3 bytes) 

-+ + +- 

common name 
(3 bytes) 

.H — —— .— — !.-.«_ — , 1— 

cef 1 (4 bytes) 
cef 2 (4 bytes) 









each cefecence consumes 4 bytes | 



3+4*n 

37 

size 
common name 

ref 1 

cef 2 



ref n (4 bytes) 



I 



ref n 



Hexadecimal 37 indicates this is a Common Block 
Reference. 

Number of bytes in this block. 

Blank padded ASCII common block name. 

Location of first reference relative to this 
module . 

Location of second reference relative to this 
module. 

Other references relative to this module. 

Location of last reference relative to this 
module. 
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4.3.9 88 - Common Block Definition 



byte — > 



38 



size (3 bytes) 



12 
16 



common name 
(8 bytes) 

dsize (4 bytes) 

comnenta (IS .. size-l bytes) 



33 

size 

common name 
dsiza 
comments 



Hexadecimal 38 indicates this is a Common 31ock 
Definition. 

Number of bytes in this block. 

31anic padded ASCII common data area name. 

Nuznbec of bytes in this common data area. 

Arbitrary information - ignored by the Linker. 
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4.3.10 39 - Short External Reference Slocic 



bvta — > 



I 39 { 
4 



size (3 bytes) 



link name 
(3 bytes) 



12 



18+2*n 



usee name 
(3 bytes) 

20 I rafi 1 (2 bytes) | raf 2 (2 bytes) | 

... I ref n (2 bytes) | 



39 



Size 




link 


name 


user 


name 


raf 


1 


ref 


2 



Hexadecimai 39 indicates this is a Short 
External Reference Block. 

Number of bytes in this block . 

Blank padded ASCII Linker name of external 
reference. 

Blank padded ASCII user name of external 
reference. 

Location of first reference relative to this 
module. 

Location of second reference relative to this 
module. 



ref n 



Locations of other references relative to this 
module. 

Location of last reference relative to this 
module . 



The Linker does not yet support the short external reference 
block. It is intended to provide for one-word offsets that are 
either filled in with call-relative, short-absolute calls, or 
possibly calls indexed by an A-register, probably A4. The Linker 
will support this type of block in the future, and compilers will 
have an option to control the kind of generated call. 
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4.3.11 3A - FORTHAN Data Area Definition Block 



by te ~ > 



3A 



Size 



3A 



size {3 bytes) 



4 
12 



data area name 

(3 bytes) 

——+___—. f- 

daize (4 bytes) 






— t- 
-+ 



Sexadeciioal 3A indicates this is a FORTRAM Data 
Area Definition Slock. 

(Tumb«c of bytes in this block. 



data area name Blank padded ASCII name of FORTRAN fixed data 
area. 



asize 



Size of this data area. 



Page 20 



Linker/Library Reference Manual 



Chaotat 4 



Object File Formats 



4.3.12 93 - FORTRAN Data Ar^a Initialization B1ogI« 



byte — > 




4 

12 
16 



3B 



size (3 bytes) 



-+ + 

data area name 
(8 bytes) 



daddr (4 bytes) | 

data occupies bytes 16 .. size->l 
in the rest of the block I 00 * 



3B 



size 



Sexadecimal 3B indicates this is a FORTRAN Data 
Area Initialization Bloclc. 

lumbar o£ bytes in this block. 



data area name Blank padded ASCII name ofi FORTRAN fixed data 
area. 



daddr 
data 
00 * 



Starting address for this data. 

The initialization data. 

If the size of the data block is odd, there is 
one byte of 00 added to make the block an even 
number of bytes in size. 
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4.3.L3 3C - FORTRAN Oata Area Reference Block 



byte —5 



ac 



.— -+ — _ — — +- 

3ize (3 bytes) 



data area name 
(3 bytes) 



12 
IS 



ref 1 (4 bytes) 

•"■ II if" I m III ■ 11 I I I ■ II ^ III .■ la !■ ■! HOB ^ ^ ir ■ raaia 

ref 2 (4 bytes) 






each reference consumes 4 bytes 



a+4*n 




8C 



size 



Hexadecimal 3C Indicates this is a FORTRAN Data 
Area Reference Block. 

Number of bytes in this block. 



data area name Blank padded ASCII name of FORTRAN fixed data 
area. 



ref 1 

ref 2 

• • • 

ref n 



Iiocation of first reference. 
Location of first reference. 
Location o£ other references. 
Location of Last reference. 
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4.3.14 as - Quicic Load Executable Blocic 



byte — > I ■ 3E i size (3 bytes) | 

+— — .— 4.— __- .—4— .— (. h 

4 I start location (4 bytes) | 

3 I data size (4 bytes) | 

12 I code block bytes (12. .size->l) ... { 

3E Hexadecimal 3E Indicates this is a Quick^Load 

Executable Block. 

size Number of bytes in this block. 

start location Relative starting address of the code block. 

data size Total number of bytes in global common data 
areas. 

code block The absolute, self-celoca table code block for 
this program-. 
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4.3.15 SF - Executable Block Definition 



byte — > I 8F | size (3 bytes) | 

4 I jump table address (4 bytes) { 

3 I jump table size (4 bytes) | 

12 I data size (4 bytes) | 

IS I num I 00 | 00 | 

20 I 00 I 00 I 00 I 00 I 

24 I size 1 (4 bytes) | 

28 I size 2 (4 bytes) { 

24+n*4 I size n (4 bytes) | 

28+n*4 I jump table bytes (... size-1) ... | 

3F aexadecimal 3? indicates this is an Executable 

Block Definition. 

size tTunbec o£ bytes in this block. 

jump table address 

Absolute load address of jump table. 

jump table size Number of bytes in the jump table. 

data size Total number of bytes in global common data 
areas. 

num C^fumber of FORTRAN Data Areas. 

00 00 00 00 00 00 

six bytes of zero filler. 

size 1 Size of first FORTRAN Data Area. 
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size 2 Siza of second FORTRAN Data Area. 

. . . Sizes of other FORTRAN Data Areas. 

size n Size of last FORTRAN Data Area. 

jump table The jump table itself, including the executable 
code for the loader. For a further description, 
see the section on "Executable Block Details". 
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4. 3. IS 90 - Library Module Block 



byte —5 




4 

12 
IS 
20 
24 
23 



90 



1 _ — h- 

size (3 bytes) 



module name 
(3 bytes) 



msize (4 bytes) 
caddr (4 bytes) 



taddr (4 bytes) 



tsize (4 bytes) { 

module count | module 1 | 

32 I module 2 | ... | 

I module n-1 { module n | 



90 

size 

module nama 
maize 
caddr 
taddr 

tsize 
module 



count 



module 

module 



1 
2 



Hexadecimal 90 indicates this 
Module Blocic. 



is a Library 



Number at bytes in this block. 

Mame of this module. 

Number of bytes of code in this module. 

Oisic address of module. 

If non-zero, is the disic address of the text 
bloclc. If zero, there is no text block. 

Size of text block. 

Number of other modules that this module 
references. 

Number of the first module referenced. 

Number of the second module referenced. 
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niodule n 



Numbers o£ other modules referenced. 
Mumber of the last module referenced. 



4.3.17 91 - Library Entry Blocic 



byte — > I 91 | size (3 bytes) 

4 link name 

(S bytes) 

module I .... . 



12 I 

+• 
U I 



address (4 bytas) 
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4.3.13 92 - UniC Bloc!c 



bvta. — > 



92 

size 

unit name 

caddc 

taddr 

tsize 

gsize 




4 

12 
IS 
20 
24 



^— __ — 
1 92 


— + _ H— — (■ ~ 

1 size (3 bytes) 




unit name 




(3 bytes) 




caddr (4 bytes) 


■f.,,,— — — 


— H ^ H 


1 


taddc (4 by tea) 


-f^— — - 


.— 4__—— _.f« .._—__—.).— ___—_— .. 


1 


tsize (4 bytes) 


+-. — — ._. 


—+_———+——.—+—.—— 


1 


gsize (4 bytes) 

— H H „ H 



Hexadecimal 92 indicates that this is a Unit 

aiocic. 

Number of bytes in this block - always OOOOIC. 

Neime of this unit. 

Disic address of module. 

Oislc address of text block. 

Size of text block. 

Number of bytes of globals in this unit. 
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4.3.L9 93 - FORTRAN SxecutataLa Data Area Reference 31ock 
oyra — > | 93 | size (3 bytes) | 

J. __+_— _^_-.+-. . H (. 

4 I area number { 

6 I ref L (4 bytes) i 

LO I ■ raf 2 (4 bytes) | 

I each C3£ec3nce consumes 4 bytes | 
I .... I 

2+4*n I caf n (4 bytes) | 

+_ — __-.—.+—.______+__ .__ — I _, h 

93 Hexadecimal 93 indicates this is a FORTRAN 

Execiutable Data Area Reference Block. 

size Number of bytss in this block. 

area number Data area number. 

ref 1 Address of first reference. 

raf 2 Address of second reference. 

. . . Addresses of other references. 

ref n Address of last reference. 
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4.3.20 94 - FORTRAN Executable Data Area Initialization Slock 



+ —4 — 1— -+ 1. 

byte — > I 94 | size (3 bytes) | 

4 I data area number | 

5 I daddr (4 bytes) | 
10 { initialization data { 



I I 00 I 

94 Sexadecimal 94 indicates this is a FORTRAN 

Executable Data Area Initialization Blocic. 

size Number of bytes in this block. 

data area number Number of the FORTRAN Data Area. 

daddr Starting address Cor this data. 

initialization data 

The data to fill the block >rith. 

QO If the size of the initialization data is an odd 

number of bytes, a filler of 00 is appended to 
make it an even number of bytes. 
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4.4 Executable Block Details 



This section describes the layout of an executable block. It 
includes details of the jump table and segment tables. 



4.4.1 Layout of an Executable Block 



byte — > 1 3F | siza (3 byta3) | 
4 I Jump Table Address (4 bytes) | 
3 j Jump Table Siza (4 bytes) | 



12 I Data Size (4 bytes) 

16 I Num I 00 I 00 



20 I 00 I 00 I 00 I 00 I 

24 I Siza 1 (4 bytes) ] 

25 I Siza 2 (4 bytas) | 

20+4*n I Siza n, (4 bytas) | 

24+4*TT I Jump Table (... siza-1 bytes) ... | 

3F aexadecimal 3F indicates this is an Executable 

Block Dafinition. 

size Number of bytes in this block. 

jump table address 

Absolute load address of jump table. 

jump table size Number of bytes in the jump table. 
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data size Total number of bytes in global common data 
areas. 

nura Number of FORTRAN Data Areas. 

00 00 00 00 00 00 

six bytes of zero filler. 

size 1 Size of first FORTRAN Data Area. 

size 2 Size of second FORTRAN Data Area. 

. . . Sizes of other FORTRAN Data Areas. 

size n Size of last FORTRAN Data Area. 

jump table The jump table itself, including the executable 
code foe the loader ■ 

If any FORTRAN Executable Data Area Initialization Blocks are 
present, they must immediately follow the executable block. 
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4.4.2 Format of the Jump Table 



A4 



— > 55TOP 
+ 2 
■»-34 

2+n*32 



Number of Segments' (2 bytes) 

+ + + 

Main Segment Table (32 bytes) 

._ !—.—___+__— h 

Segment Table *2 (32 bytes) 



Segment Table i>n (32 bytes) 

Dummy Table 8«n+l (4 bytes) | 

5_START Descriptor (10 bytes) \ 

Segment #1 P#2 Descriptor 



Segment II ?fn Descriptor 
Segment Hrl P#l Descriptor 



Segment l>2 P#n Descriptor 
Segment #3 9fl Descriptor 



All segment 

descriptors 

+ are 10 bytes. 



I Seg. #a ?in Descriptor (10 bytes) | 

-20 I Address o£ S£MOVEl (4 bytes) | 

-16 I Address o£ Buffer (4 bytes) { 

-12 I Address of Code' ?il« (4 bytes) j 

-a I Active Segment List (4 bytes) | 

-4 I Address of ?$TOP (4 bytes) | 

$$I,OADIT Object-code neccessary to 

load and execute a segment. 
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4.4.3 Layout of a Segment Table 

A Segment Table consists of eight 32-bit values: 



byte — > I Address of first descriptor | 
4 I Pile Address of Segment | 
3 I Size of code in bytes | 

12 I Actual Address in Memory 1 

+ — - — _-_+_- — « — «+ _ (. + 

16 I Scratch Return Address | 
20 I Segment Reference Count | 
24 I Active Segment-list link | 

■)———— !■ '■■ ■ ■ -H — __-,__ — 1 _ h 

23 I ... Reserved ... { 
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4.4.4 Layout oC Descriptors 

An entry-point-descriptoc is in . one of two states, depending 
whether its corresponding segement is in memory or not. The 
formats o£ a descriptor are: 



When Segment not in memory: 



When segment in memory: 



Relative offset of this 

entry in its segment. 

JSR XXX. £i 

Absoluts address of 
3$L0ADIT 



I Relative offset of this 

I entry in its segment. 

^_ — _______-.-._+____-._« 

I JMP XXX. L 

+—————- 1- — - 

I Absolute address of 



procedure as loaded 

_ — I -- 
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4.5 Loading a Segment 

A segment is Loaded into memocy when the first call to one of 
its procedures is executed. Such a call is always via a 
descriptor in the jump table. 

The JSR to 55I.OADIT executes the loader from its entry-point 
'S$LOADIT'. The loader is able to tell which segement to load by 
comparing the place from which it was called with the limits of 
the segment-table entries found in the first part of the jump 
table. The loader then performs the following actions: 

1. The loader loads that segment. 

2. Fixes up all the JSR' s to JMP's, so that further calls upon 
that segment jump directly to the entry-point instead of 
calling the loader . 

3. Saves the calling routine's return address in the segment 
entry. 

4. Patches the return address on the stack to return through 
the anti-loader entry-point '$$REM0VE1'. 

5. Jump to the procedure entry-point which caused this Loader 
invocation in the first place. 

Further calls to entry-points in the segment are thus only 
slowed by a single JMP instruction instead of a loader call. 
When the initial call to that segment eventually returns, it will 
pass through '$$R£HOVEL', which removes that segment and reclaims 
the memocy which that segment uses. 



4.6 Running a Program 

When a program is executed, the program called 'run' performs 
the following steps: 

1. The file containing the executable program is opened, 
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2. It is checlced to see if it is the coccect format, for 
exampLa, the first byte should be 3P,g, 

3. The jump table is Loaded into the proper Location in 
memory, and 

4. ' A JSR to JT+Word{JT) *32+2 is executed. 

The normal overlay procedure then takes control to overlay the 
main segment and begin execution at its starting address. 
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Corvus Systems Technloai Note 6 
Writing a Corvus CONCEPT Driver 



r i g e 



Subject: Writing a. Corvus CONCEPT Driver 

Rev Lvl: 01 08-2S-82 L. Franklin 

01 11-08-82 L. Franklin (Update interrupt vectors 



This Technical Note discusses the bjsio oon'jepts ot willing a 
driver for Corvus CONCEPT Operating System, then shows ^n eK^impie 
of such a driver written in 68000 assembler code. 



6.1 Driver Calling Conventions 



□river parameters are passed in registers, as follows 



'J nit number 

This parameter is useful tor validity chtioking when a 
given driver can have more than one logical device 
assigned to a singlt! physical unit (such as a disk). 

Buffer pointer 

Pointer to buffer t o / f r cm which the data transfer is 

to be ma de . 



D2.W I Length of data transfer 

: Number of bytes of data to be transferred. 





Starting block number 

Block number at which the transfer is to 

is only applicable to blocked devices. 



Til I s 



D4 . W ; Command 

Determines what operation (UnitRead, UnitBusy and so 
on), that the driver is to perform. This parameter is 
described in detail below. This parameter is the only 
valid parameter passed to UnitClear or UnitBusy. 

+ 

D5 .W i Mode 

1 Device dependent and control operations such as 
I whether data compression characters are to be 
' recognized. 



The result of the operation (lORESULT) is returned in register 
D7.W by the called driver. 
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r i V e r Command Parameter 



The comm<ind parameter passed in register D4W defines the 
operation to be performed When the driver gets control, the 
c i. I . e c has alreaay veci:isd (ti'om the device tabie/ thac this 
oommind is valid for this particular driver. The driver must 
hive a minimum of an RTS for each command Drivers must not use 
the heap or slack for long -term storage. The values o i the 
command parameter are. 




Unitlnstall -- Install the driver 

I When the operating system installs a unit, either 
at boot time or when i unit is explicitly assigned, 
the driver is called with the install parameter. 
This section performs any initialization code 
necessary to set up cyclic buffers, place interrupt 
vectors and so on. 

'JnitRead -- Read from the unit 
Sel C-eiiplanatory . 

UnitWrite -- Write to the unit 
Sel t -eKplanatory . 



UnitClear -- Clear the unit 

Reset the device to its initial state. Initialize 
the device, clear pending interrupts and such. 



Unit Busy -- Test if unit is busy 

Check if the unit is ready for data transfer. 
Driver returns DO B = 1 (TRUE) if data is ready for 
transfer, DO.B a (FALSE) otherwise. 



UnitStatus -- Return status information from unit 
This command is device dependent Using the 
function code (D2.W), the driver can return device 
dependent information to the caller. The buffer 
address may be used as a pointer to a UnitStatus 
par ame t e r block. 



UnitUnmount -- Unmount the unit 

This command is used when the unit is deassigned 
At this time the driver must perform any clean up 
or restoring of interrupt vectors that might be 
necessary. 



Copyright 1982 Corvus Systems, Inc 



No v emb e r S , 



19 82 



Corvus Systams Technical No t a 6 
Writing i Corvus CONCEPT Driver 



Page 



6 3 Static RAH Information 



Each I/O slot is assigned a 2S6 byta area in static RAM. The RAM 
designated for each slot may be used in any manner by the device 
in the slot. Additionally, a 312 byta static RAH buffer is 
available for very temporary operations. This buffer may only be 
used during a single call to the driver. The static RAH 
locations are: 



Static RAM for I/O slots 



1 00900-009FF 1 CPsllram 1 static RAM for slot 1 device 

+ __ -- + ____ — _ + _____ ___. 

: OOAOO-OOAFF I CPsIZram I static RAM for slot 2 device 



OOBOO-OOBFF ', CPsl3ram 1 static RAM for slot 3 device 

--1 ___ -I -_ — _ _ _ -. 

QOCOO-OOCFF ; CPsMram 1 static RAM for slot 4 device 



Buffers and stack I 



: OOOOO-OOEFF I CPiobuf I I/O buffer (S12 bytes) 
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6.4 PROM Default Interrupt Vectors 



The Corvus CONCEPT workstation PROM contains default interrupt 
handlers. If a driver uses system interrupts, the interrupt 
vector used by the driver must be restored when the driver is 
unmounted. The PROM also contains a tdble of default interrupt 
vectors which must be used when restoring an interrupt vector 
during unmount. The PROM locations tor the default intecrupt 
vectors are; 



Default interrupt vectors 



! 10070-10073 




CP i veo 1 




level 


1 


interrupt 


vector 


(SLOTS ) 


1 10074-10077 




CPi veo2 




level 


2 


interrupt 


vector 


(DCl ) 


: 1 0078-1Q07B 




CP i veo 3 




level 


3 


interrupt 


vector 


(OMNI NET) 


: 1007C-1007F 




CP i veo 4 




level 


4 


interrupt 


vector 


(DCO ) 


1 10080-10083 




CPi vecS 




level 


5 


interrupt 


vector 


(TIMER) 


! 10084-10087 




CPi vec6 




level 


i 


interrupt 


vector 


(XYBD) 


1 10088-10088 




CPi veo7 




level 


7 


interrupt 


vector 
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6.5 Driver Example 




I DENT 
GLOBAL 



DRVDTACOM 
DRVDTACOM 



DRVDTACOM 



Par ame t er s 



Command 



The OataComm driver 

OO.V - Unit number 

Dl.L - Address o( buffer 

D2 . W - Count 

D3.W - Bloolc Number 

04 .W - Command 

D3.W - Aooess Mode 

Input Parameters: 

Unit Addt Count BIoclc Mode 



Install 

Read 

Wr i t a 

Clear 

Busy 

Status 

Unmount 



00 


.W 














DO 


W 


01 


L 


02 


W 


03 .W 


05 .W 


DO 


.W 


01 


L 


D2 


W 


03 .W 


05 .W 


DO 


W 














□ 


.W 














DO 


W 


01 


L 


02 


W 







00 .w 



Resu It values: 
lORESULT Busy 



07 


W 


07 


W 


D7 


W 


D7 


W 


07 


W 


07 


W 



DO .B 



07 .W 



The unit number for this driver is always passed in register 
DO.W. All commands always return an lORESULT in register 07. W. 
UnitBusy is the only command that passes a result back in 
register DO . B . The UnitRead, UnitWrite and UnitStatus commands 
all espect a buf f er address in register Dl.L and a byte count in 
register 02. W. 

In the case of the UnitStatus command, the value in register 02. W 
is a control parameter or a UnitStatus function code and not a 
count . 

The driver must protect A4-A6 which is used by the operating 
s y s t em . 
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Tha naxt aaction is tha antry for a dcivar, illustrating how the 
Drivar Haadar Tabla is organisad. 



Drivar raiatad aquatas 

iOE i oc eq aqu 3 
MaxCmd aqu (> 

Soma UART aquates 



□cmPort aqu 

Uda aqu 

Us t aqu 

RdB it aqu 

WrBlt aqu 



t30(21 



Z 

3 

4 



IQHESULT - invalid I/O request 
Maximum valid command 



DataComm UART pointer 
UART data port offset 
UART status poet offset 
Busy bit for inpu t 
Busy bit for output 



Entry point for the DataCoran drivec 
DRVDTACOM 

□river Header Table 



dhm 
dhml en 



be a . B DcmReq 

data . b 

data . b IS 

data . b 82,07,04, 00 

data . b dhml en 

data.b 'DataComm driver 

equ S-dhm 



Go to start of driver asecution 
Dev ice bl ocked 

(0 - false, 1 ' true) 
Valid commands (1-31) 
Date (year, month, day, filler) 
Length of ID message 
ID message 
Value of ID message length 



The Driver Header Table is used by tha operating system when 
loading the drivar. It must be plaoad at the driver entry point 
and in the order shown above. 

Valid commands range from I to 31 and are the summation of valid 
command oodes for the drivec. Command oodes are: 



1 - UnitRead 

2 - UnitWrlte 



4 - UnitClear 

5 - UnttBusy 



16 - UnitStatus 



Date and ID message are used to help traok different versions of 
the driver. The ID message and message length (ia, a string) may 
be up to 30 oharaoters In length. 
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The neict section illustrates how the various sections 
driver are oalled depending on the specific command. 



of the 



DcmReq 



mo veq 
cmp . w 
bh i . s 
o 1 r . w 
mo vem . 1 
move . 1 
move . I 
lea 
Isl .w 
move . w 
J sr 
mo vem . I 



#IOEioreq ,d7 

tMaxCmd , dl 

DomR t rn 

d7 

dl-d&/ aO-ad , -( sp ) 

dl ,aO 

#DomPor t , a 1 

DomTABL , a 2 

#1 , d4 

0< a2 , d4 .w) , d4 

( a2 , d4 . w) 

(sp)^-, dl-dd/aO-ai 



DcmR t rn r t a 



Set lORESULT to invalid cmd 
Is command valid? 
No , just Cdtucn 
Clear lORESULT 
Save registers 



AO 
Al 
A2 
D4 
D4 
Cal 1 



■ Data buffer address 
I UART pointer 

■ Offset table base addr 
• Command*2 (word count) 
> Offset from DcmTABL 

appropriate subroutine 



Restore registers 



Return to caller 



DcmTABL data . w 
da t a . w 
da t a . w 
da t a . w 
data . w 
da t a . V 
data . w 



DomlNST-DomTABL 

DomRD -DomTABL 

DomWR-DomTABL 

OomCLR-DomTABL 

DomBSY -DcmTABL 

DomST-OcmTABL 

DcmUNMT-DcmTABL 



Install driver 
Read from OataComm 
Write to DataComm 
Clear Oa t aComm 
Tes t it busy 
Re turn status 
Unmount driver 
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The next ( ew code sections illustrate the entry points and give a 
broad view o( the operations performed. 



DcmlNST - Install the driver 
DomlNST 



code to initialize 
.... the device 



r t s 



; Nothing to do in this example 



□cmUNMT - Unmount the driver 
DomUNMT 



code to terminate 
. . the dev ice 



r t s 



i Nothing to do in this example 



OcmST - Device dependent status request 
DomST ; 



code (or status 
. . r eques t 



r 1 1 



Nothing to do In this example 



DcmCtR - Clear the DataComm driver 
DcmCLR ; 



.... oode to clear 

.... device 
r ts 



Nothing to do in this example 



DcmBSY - See if character available 



Returns: DO . B - Result 

DcmBSY moveq #0,dO 

btst ttRdBi t ,Ust (al > 

bo t { .5 DomBSYr 

moveq Kl , dO 

DcmBSYr rts 



Assume FALSE (no character ready) 
Charaotec to read? 
No .return 
Set TRUE 
Ret urn 
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; DomRD - Read character(s) from DataComm 



OcmRD 

CrdLoop subq.w »l,d2 

bmi . s Cr dEx i t 



Cr dBusy b (: s t 

bof ( . s 
mo ve . b 
br a . ■ 

CrdEx it r t s 



WRdBi t ,Us t < a 1 ) 
Cr dBusy 
Uda(al ) , ( aO ) + 
Cr dLoop 



Mor e to read? 
No , return 

Is ohar in UART? 

No , try again 

Move character to buffer 

Go for next character 

Re turn 



OcmVR - Write character(s) to DataComm 



OcmWR 

CwrLoop subq.w #l,d2 

bmi . s Cwr Exit 
.... remaining logic similar 
.... to DcmRO except for 

.... diraotion of transfer 
CwrExit rts ; Return 



Mo r a to wr i t e ? 
No , return 
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Subjaot: Exacuting a Program from Corvus CONCEPT Pascal 
Rav Lvl: 01- 09-15-82 L. Franklin 



This Tachnical No t a auplains the use of the Corvus CONCEPT Pascal 
CALL function which is used to execute a program from within a 
Pascal program. Also, the HALT procedure is dascribad which is 
used by a Pascal program to set the CALL function result for the 
calling program. Both CALL and HALT are internal to the SVS 
Pascal oomp i 1 er . 

Refer to Technical Note 11 for a summary of callable system 
programs and their associated parameters (arguments). 



10.1 CALL Function Parameters 

The general form of the CALL function i s : 

result :> CALL (filelD, Ifile, Ofile, pArgPtrs, NbrArgs); 

whe r e : 

result - is the function result of the called program. The 
function result is one of the following values: 

< - exaoution error 

- no error 

1 - insufficient code memory 

2 ~ code file read error 

3 - file not executable code 

4 - file is not linked 

5 - code file open error 

6 - too many processes <10 maximum) 

7 - insufficient data memory 

8 - terminated by user 

filelD - is a string containing the program file name. If the 
volume name is not specified, the current volume is 
searched for the specified program file. If the file 
is not found in the current volume, the system volume 
is then searohed. If the volume name is specified, 
only that volume is searched for the program file. A 
program file name with a "!" prefix indicates the 
program file is in the system volume. These are the 
same rules as requesting a program from the command 
1 ine . 
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ICila - is tha default input file FIB foe the called program. 
INPUT may be used to specify tha default input file of 
the current program. 

Ofile - is the default output file FIB for the called program. 
OUTPUT may be used to specify the default output file 
of the current program. 

pArgPtrs - is a pointer to an array of argument string pomcets. 
The array contains "NbrArgs" entries. 

NbrArgs - is the number of arguments to be passed to the called 
pr ogr am ( ARGC ) . 

If function key labels are in use when tha CALL function is 
executed, the calling program is responsible for turning off and 
reinitializing the function key labels. If the called program 
does not require user input, no special function key label 
processing is required. 



LD.2 CALL Function Example with No Arguments 

The following example calls a program (MEM) with no arguments. 

procedure callpgm, 

type str64 ■ 3tringC64]; 

pstr64 » Astri4; 

strtbl ■ array CI. .1003 of pstr64, 
pstrtbl a Astrtbl; 
var result: integer; p: pstrtbl, 
begin 
p : « NIL , 

result :• call < ' / CCSYS / MEM ' , i npu t , ou t pu t , pA , ) , 
end ; 

This example outputs a simple memory map to the console. 
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10.3 CALL Function Eaample with One Argument 

The following example calls a program (SystmMgr) with one 
a r gumen t : 

procedure callpgm; 

type str64 ' 3tringC64], 
pBtr64 » AstrSiJ; 

strtbl « array CI. .1001 of pstr64; 
pstrtbl > Astrtbli 
var result: integer; si: str64) pi: pstr64; p: pstrtbl, 
begin 

p :3 Spli pi :■ Ss 1 ; si :> 'SETDAT'; 
result :a call < ' ! CC . 3YSMGH ' , i npu t , ou t pu t , pA , l ) ; 
end , 

This example outputs the currant date to the console. 



10.1 CALL Function Example with Two Arguments 

The following example calls a program (VndowMgr) with two 
a r gumen ts : 

procedure callpgm; 

type str64 a stringC64]; 
pstr64 > Astr&4; 

strtbl a array CI. .1003 of pstr64; 
pstrtbl ■ Astrtbl; 
var result: integer; 

sl,sZ: str64; pl,p2: pstr64; p: pstrtbl; 
begin 

p :a 9p 1 ; pi :> Ss 1 ; p2 :> 9sZ; 

si :» 'CSDISP'; s2 ;- ' / CCUTI L / CSH . ALTCHARSET ' ; 
result :a oall ( ' CC . WNDMCR ' . tnpu t , ou t pu t , pA , 2 ) ; 
end ; 

This example loads the alternate display character set. 

In general, the pstr&4 values (pl,p2,..,pn> mus t bedeolared in 
order since they become the argument string pointer array (the 
oompller allocates these variables sequentially). 
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10.5 HALT Procadura Paramatacs 

Tha HALT procadura aata tha CALL function raault for tha calling 
program and tarminatas program procaasing. Tha ganacal form of 
tha HALT procadura is: 

HALT <RaturnCode) ; 

wheca RaturnCoda is tha intagar function rasult valua passed to 
tha calling program. A zaro RaturnCoda is usad to indicata a 
successful oomplatlon. Positive RaturnCode values aie usad by 
tha Operating System during program loading. Negative ReturnCoda 
values are used to Indicate execution errors. 

If an axeoution error (negative ReturnCode) is set during an EXEC 
fila function, the remaining EXEC commands are ignored. System 
development programs, such as the Pascal compiler and linker, set 
esecution error codes if the program function is not succeaafully 
completed, Therefore, an EXEC file with several Pascal 
compilations and links is terminated at the first eitaoution 
error, saving time by not processing invalid data. 
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NOTE 

THE EXAMPLES IN THIS FIRST SECTION ARE ACTUAL 
ASSEMBLS LANGUAGE SUBROUTINES FOUND IN CCLIB, 
THE PASCAL SYSTEM LIBRARY. 
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HOVEH.V (SF)«,DO-Di 
BCHC DO.Dl 
HOVE.W D1,(SF) 
JHF (AG) 



, AO s [ttorn iddctsi 

, DO • bit nabt, Dl < diti woid 

; flip tb( bit 

I piict chiijed woid on stict 

; (ctutR to Fiscil 



FuBCtion BitBit (diti.bitiiiii. Integer): inttgec, 



BIT9ET HOVE. I (SF)t,AO 

HOVEK.W (SF)*,D0-D1 
BSET DO.Dl 
MOVE.V D1,(SF) 
JHF (AO) 



AO s ittotn iddiess 

DO : bit nibi, Dl ' diti woii 

stt tbt bit 

pUct cbmged woid on stick 

ittiirn to Fiscal 



Foaetion BitCleic (ditt.bitnui: integei): integti, 



BITCIEAB 



HOVE.L (SF)t,AO 
HOVEH.V (SF)»,D0-D1 
BCLI 00,01 
HOVE.V St,(SF) 
JHP (AO) 
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END 
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incliidt '/ccos/os.gbl.asi. t<it' 



File CCLIB.OSI.TEIT 



CClIBJkSH 



Fiit 2 



IGO0I1OC3 
lOOtOOlS 

osooogu 
ooooocn 

1011011120 
00900021 
00000022 
00000023 
10000024 
OOOOD02S 
0000OG2i 
00000027 

00000021 

eooooo:; 

0010002A 
OC00002B 
0000002C 
I000002D 

00000032 
00000033 
00000034 
0000003J 
0000003i 
00000037 
00000030 
00000039 



OOOOOIID 
00000114 

ooeooiii 



ooooooeo 

00100002 



Fill oitbl.isa.ttit 
Dilt 20-Aig-l2 



Coiiiis CQHCEFT optritin) >||ftia ditt ittrnctaci iquitii 



Additional Corfgs CONCEFT I/C ctfgit codtf 



lOEiortq iiiii 

lOEnotd cqa 

lOEtiiot iqg 

lOEiiobof tqii 

lOEwndls iqo 

I0E«ld6l tqo 

lOEwndct cqa 

lOEwndde eqs 

lOEwnddi <qa 

lOEHadiw tqu 

lOEwndwc iqg 

lOEwndwo iqo 

lOEnodir eqo 

lOEnolfb <qu 

IDEnotii cqo 

lOEnotn cqu 

lOEDopit iqg 

lOEsldri tqu 

lOEtblid iqo 

lOEtbtll tqg 

lOEtblii iqg 

lOEkfbtt tqg 

lOEgiepi iqg 

lOEriili iqg 

lOElnccd iqg 

lOEcltit iqg 



i S|itii Cguoa 

pSfiCoi iqg 
SyiKibdFIg iqg 
STfBrtiScti iqs 



; S|(til Couoi 

SCiicstt iqa 
SCpricao iqo 



istii 

110 
114 

114 



Istilid I/O (iqoiit 

Tontpoilir not iiid] 

Tiiid oit Mtiting fii Ouioit tfint 

Riid withoit a iilid wiiti bgifii 

Iivilid windoH Ignction 
Window oEiiti booidiir 
Invilid ohiciotic lit 
Diliti oiiiial vtidoM 
Siliti ifitii wiidoH 
Inictiii window 
Uolid wiidoH iicoid 
Invilid s|it» wiidow ntibii 

Diiplir dtiiii not KtiUbli 
Kifboird diifit III Kiitibli 
TiMi diiiit not toUibli 
OHHINET diifir not iniUkli 
Fiintii diifii not iTtlUbli 
He floppf d[i*i it ilot 

Uftlid tibli inttT ID 
Tibli [nil 
Tibli istif In oil 
Xifbiiid tiinfiiiiion iiioi 
IniiUd Hit WO ptciaitii 
Iniilid ptuaitit blook Ui|tk 
Inrilid fiiotiOB codi 
Clook (btcdwiii) ailfgnetigi 



.pointit to iddcifi If STSCOH 

ilijboiid eoitiol (Ugi 

^diipIiT <ti<ii - IftK pit icti till 



Iqiitii 



,wiid - 1/0 (liilt 

iWltd - OlIIIBt pClllii IBKblt 



File: 



CCIII.QSI.TEIT 


CCLIEtSH 


eOOII0004 71 


SCfrethp equ 4 


tOOtOOOS 72 


SCitibli cqu 1 


OOOtOOOC 73 


SC9|ioot eqD 12 


IDO«OOIO 74 


SCsfsio eqa U 


oogoooM 7S 


SCdiittb iqu 20 


OOOOOSIB 7i 


> SCdltnii iqu 24 


OOtODOlC 77 


■ SCulibIt eqa 21 


loooogzo 71 


> SCtodir equ 33 


goooooiz 7« 


SCcodijt equ 34 


9OO0O02i 10 


SCnitpio cqu 3! 


00000021 11 


SCnuipio equ 40 


IDOOOOiA 12 


SCpcotbl equ 42 


0000002E 13 


SCbootu equ 4i 


00000032 14 


SCieaaip equ SO 


0000003i IS 


SCbootdT equ S4 




equ Si 




; equ SI 


I000003C to 


SCsIttbl equ iO 


00000040 71 


SCiootw equ i4 


10000044 72 


SCcuicw equ il 


00000041 73 


SCcuitl equ 72 


0000004C 74 


SCusecid iqu 7i 


4000004E 7S< 


SCfcsnbc equ 71 


00000092 H 


SCvtidit equ 12 


OOOOOOSi 77 


SCwndtbl equ l( 


OOOOOOSX 71 


SCssiinh equ 70 


oooooosc u< 

100 


SCsuttcq equ 72 



Fiqe 3 



linl - Itie heep pointer 

list - juip tible pointer 

lint - deimlt outpot file pointer 

lint - defiuli input Hie pointer 

lint - device tuniti tible pointei 

lint - diceclor; naie strinq pointer 

lint - nset tible pointei 

word - STSti* dite 

lint - code imp tible pointei 

word - neil process nuibei 

word - nuiber of processes 

lint - process lible pointei 

lint - boot dcfice n»e pointer 

lint - leioi] up pointer 

word - boot device nuibei 

CONCEPT idditions 
iwoid - nnosed 
word - unused 
lint - slot tible pointei 
lint - root window record pointoi 
lint - current window record pointer 
lint - cotient t;e)boitd record pointer 
word - ConstelUtion usei ID 
lint - eaitent teision ngabct strinq pointer 
lint - current version dite sliin; pointei 
lint - window tibie pointer 
iNord - suspend inhibit count 
word - suspend request if noo-teio 



File CCLIB OSl.TCIT 



CCLIBiSH 



Ftgc 4 



tooioooo 

0010(11104 
OOOOOOOB 

otoooooc 

10003010 
00000014 
90000018 
ODOOOOIC 
10000020 
00900024 
0001002S 
0010002C 
10000030 
00000034 
00000038 
Q000003C 
00090940 
00000044 
10010048 
OOOOOOiO 
10000014 
0001007C 
OC01I080 
00100014 
10000088 
0000008C 
00010090 
00000094 

oooioon 



10010000 
00010104 
10000006 

oooooooc 

OOOOOOIO 
01000012 
00000014 
000090U 
00010011 
DOOOOOIA 



, SfittB 


Vieloc 


Eqoitti 


SVowriti 


tqo 




1 ionit wtiti 


SVgitiil 


tqo 




.unit leil 


SVudtic 


•m 




,usit tlm 


SVubnsr 


iqn 




lUDit boif 


SVpot 


cqg 




<pgt 


SVgtt 


tqo 




I ,|.t 


SVinit 


•qu 




1 ,iait 


SVoptn 


<qi 




1 ,opt> 


SVdcii 


tqo 




1 iClost 


SVwicbir 


•qa 




,«iittchii 


SVrdctii 


cqu 




1 ifiidchat 


SVbltio 


•qg 




1 ibioctio 


SViiik 


iqu 




1 ,ittt 


SVniw 


tqo 




( ,ltH 


SVdsposi 


tqo 




.diiposi 


SVuik 


iqii 




1 ituk 


SVcliifi 


■qo 




1 ,tiliiii 


SVatiiil 


tqu 




.itiori iiiiltblt 


SVgttdic 


tqu 




,]•! diiicl«[f 


SVcikptk (III 




iciiik ptik i»i 


SVoiUt 


cqg 




1 ,oiit ftitui 


SVeli 


iqo 




1 ,c9u>iid liBi intitptitti 


SVgitini 


tqu 




1 ,tlt lOlllI Siltf 


SVfildii 


tqu 




1 icbtek itlid diiiotoii 


SVIlpdti 


tqu 




t ,(tip diiictiif 


SVtchdic 


iqg 




1 iiiiich diiictiri 


SVdiltot 


iqg 




) ;diltti diiietocr iBtiT 


SVpatdii 


iqo 




iwiitt dittetoii 


SVuiBftl 


iqg 




1 ,gait iattill 



, Hiioir Hip Eqgitii 



miodti 






HHhidti 






KKIgeod 






WOiicod 






KHbtiw 






HHbtdli 






KKbtilt 






HHbttii 






KHbtdti 






KHblbU 







iliit - Igw diti poiattr 

.list - ki|k diti poiitii 

,list - low eedi poiitic 

ilist • kigk lodi pgiitir 

,«oid - boot fwitckif 

iNoid - boot dt<lot iiibii 

;woid - boot ilot Btabtr 

,Moid - boot iirfic anbii 

iKotd - boot diift BBibii 

,«o[d - boot lolttu block aaiboi 



rilt: 



CCUB.OSI.TEIT 




C 


CLIBAS 


H 




Ptgt i 




so< 

51" 
52« 
53« 


; Unit 


libit 


Equitti 




KOtOOCi 


UTiodtf 


•qg 




Jint - 


I/O driftr pointtc 


(OlOOOti 


H* 


UTbK 


tqti 




;biiot - 


blocltd dtfict flag 


lietoeo? 


55« 


irratd 


(qn 




,bg«l - 


lounttd dtirict fUq 


leioooDi 


JM 


trrdid 


iq« 




,slr7 - 


doict ID 


iooeooio 


in 


UTdi 


•qu 




,lint - 


dt«ic< tut 


tOSOOOM 


s«« 


UTilt 


iqg 




jbjtt - 


dtfict slot 


lOOOCClS 


5»8 


i;T«t» 


eqy 




,bltt - 


dtfict StKtl 


ttottou 


iOo 


VTdti 


•qo 




.bjlt - 


disk dcift nibi 


KOIOill? 


it' 


tfTlTii 


iqo 




;bflt - 


disk drift tfpt 


OOltOOll 


i2> 


VTtpt 


tqn 




ibjlt - 


ttiitors pt[ trick 


ctoeooit 


i3« 


UTtpt 


•qu 




,bTt« - 


tricks ptr side 


tiieooiA 


44» 


UTto 


iqo 




ibool - 


dtiict rtid only 




iSi 


i 


cqo 




,b!t« - 


. . . onustd 


tlKOOtC 


i(> 


irrbik 


eqa 




,linl - 


disk bist block 


ttotooio 


»7» 


UTlin 


•qu 






tntrr linqth 




Hi* 
70« 

7 1 • 


, Slot 


Ttbli 


Equit 


•s 




K0I90O0 


f I' 

72« 


STbtill 


eqo 




,boot s 


lot noibtr 


09100002 


7J« 


STbttti 


eqo 




,boot ••[••! nuabti 


10000004 


74* 


STuslt 


tqu 




,icti«< 


slot nuibtr 


lOOOOOOi 


75« 


STicsii 


tqu 




.ictiii 


strftr nuibtr 


oooioooa 


7i« 


3T>l>lt 


tqu 




;tlt<rnitt ilot aoibti 


OOOOOOOA 


77« 


STiIitf 


•qo 


to 


;ilttin>tt sti«it agibet 


iOOIOOOC 


7I« 

7»« 
tot 


STlnln 


tqa 


12 


;i[c<r 


[I. .51 of .... 


10000000 


STubc 


tqo 




; slo 


t nuibtr (l-SI 


00000001 


It* 


STtfpi 


tqu 




, dt«ict tfpt <9UU;ptsl 


10000002 


12* 


STndii 


tqo 




nuibtr of drivit 


00000004 


»• 


STinf«l 


tqu 




, difict into length 




1I4< 













Fill CCII! 051 TCIT 



CCLIIASN 



Ftgi i 



OOOOOQCD 
00000104 
gOOOOOOt 
OitooOOi 
tOOOOOOA 

oooogooc 
ooooocio 

oomiion 



OOOiOOOC 
00009004 

tooooooe 
ootooooc 

OOOOOOOE 

oototoio 
loooooi: 

00000014 
OOOOOOli 
OOOIOOll 

ooooocu 

OOOOOOIC 

oooooou 

00000020 

00000000 
00000301 
00000002 
10000003 
00000004 

ooooooos 

OOlOOOOt 
00000007 

OOOOOOil 

00000000 
OIOOODDl 
00000002 
00010003 
00000004 
OOOOOOOJ 
0000000« 
OOOO0DD7 

00000022 
10009023 



Cliii4el(i Sit llccoid Eqiitif 



CStblloc (qu 





CSlgicli eqg 


4 


CSbpct tqo 


i 


CSfisUk tqo 


1 


CSIiitcli <qii 


to 


CSiist iqg 


12 


CStttcl iqg 


li 


CSittr2 tqo 


17 



, Window Rtcoid Cqgitii 



VHcliiiiit 


tqg 




VRhoMpI 


equ 




VRcucidt 


tqo 




VRhoiiof 


tqo 




VRbisti 


tqo 




VRbiiii 


tqo 




VRlnqtbi 


tqo 




VRlDgtkr 


tqo 




VKciiii 


tqo 




VRcoiii 


tqo 




VRbitofi 


tqo 




Vilgiorqi 


tqo 




Vflqiortr 


tqu 




VRitttl 


tqu 




iniiit 


tqo 




nndsci 


tqu 




intiod 


tqo 




fiddtlll 


tqu 




nointsli 


tqo 




iyswiD 


tqo 




ICtid 


tqu 




suspiitd 


tqo 





VIIiU(2 tqo 33 



Ttit 


tqo 




gcipbic 


tqo 




corson 


tqo 




iii«cot( 


tqo 




Mitpon 


tqo 




noscioll 


tqo 




dctc 


tqo 




Tidttt 


tqo 




VRititi 


tqo 


34 


WRrcdltD 


tqo 


3S 



cbtiictii lit dill ptiitic 
icinlinii pit cbtiKtir Uiiuit widil 
biti pii cbiitcttc (iirtieil kiiqht) 
fiitt cbiitctii codt - ascii 
lilt chidctii codi - ifcii 
lilt oitd in positioning otilt 
ittcibotti 

bit : 1 - fiiticit oiitotttioD 
cotiintlT oouitd 



cbirictti ttt poiotii 

bolt (uppti Ittt) poiottt 

coiiint locitios poiotti 

bit slfitt ol holt Ucition 

belt I filoi, (tUtiii to toot HiodoH 

bolt I kIoi, ttlitiit to toot tiisdo* 

■iiiagi I filoi, itUtiTi to window (bill) 

liiiioi ) ttlot, itUtiti to window <bits) 

cutitnl I filot (biti) 

coiiint I ftlot (bitil 

bit ofUtt of cntiint tdditif 

gitpliics - etigin i (bits iilitivi to hoii loc) 

gtiphici - oiigln f (bits ttUtiit to boii tool 

tttiibotti 

inftiti lidco ledi 

ondttscoti itdt 

instit lodt 

< V on B, 1 > B on V 

= loto IF w/CI, 1 • no ioto IF 

Sfstti dtfintd window 

ictift window 

sutptndtd window 



ttttibutii 

1 ' Ttiticil, 
1 > gtipbict, 
1 • cottoi on, 

1 • IDItltl, 

1 • witp, 
1 > no ictoll, 
1 • piging aodt 
I • iniiisi 



' hotiioitil seiitn 

> chtitettt lodi 

• citioi oil 

t ' onditlint coftoi 

> clip It toln 

■ scioU 

• notiil 



osid lot dicoding tictpt siqotocii 

window dtsciiption iicitd lingth 



rile: CCLIB.OSl.TCIT CCLIBASH Ftgc 7 



II0000024 240* VRUngtli (qa 3( ;iotuil wisdow (tcoid lingtli 

241> 



Fill CCIIB.OSI TEIT 



CCllBUH 



Figi i 



0000 

0000 :27l Olio 
O0D4 22if 003C 

0001 3Fif 0004 0001 

oooE mi 



0010 

0010 227! Olio 

0014 22it 003C 

0015 3F(! OOOi 0004 
OOIE 4E73 



0020 

1020 2271 Olio 

0024 224! 003C 

9021 3Fi« OOOI 9004 

002E 4E7J 



0030 

0030 2371 Olio 

0034 22it 003C 

1031 3F<t OOOt 0094 

003E 4E7S 



OSXCTSIT - Git ictid flot faietioi 
FUNCTION OSictSlt: inliqtn 
aSietSIl 



lOfl. I 


pSffCoi.ti.tl 


,C(t pointti to SfiCoi 


■Oll.l 


SCflttbUill.it 


,Cit poinlit to ilot libli 


■Oft.W 


3TiccIt(il),4(sp) 


,Git lotifi flot (rot ilot tibit 


Its 




iEttllR 



OStCTSEV - Gel ictint iiifor [auction 



FUNCTION OSictScr intogiii 



OStctSci 



■OTI. 1 


pSfiCoi.w.il 


Got poiBtti to SrsCoi 




■Oft. I 


SCilttblliU.il 


Git pointir to ilot tibii 




■OfO.W 


STie9[r(ll),4(fp) 


Git lotiit iiciir fioi flot 


tiblt 


tti 




lllOII 





OSAITSIT - Git ilticntti flot foiotioi 
FUNCTION OStltSa. intigici 



OSiItSlt 



■Ofl.l pSfSCOLWill 

■ou.l SCfUiblltU.d 

■oii.w STilfIt(il),4(fp) 
iti 



Git pointit to iitCn 

Git pointii to flot libli 

Git iltitiiti flot Icoi flot tiblt 

litUtB 



OSILTSIV - Gtt iltiiiiti ftrrtc foictioi 
FUNCTION OSiltSci: intigiii 



OSiltSii 



BOTt.I pSftCot.w,)! 

■oti.I SCilttbUill.tl 

Ufi.w STiIfr>(il),4(ip) 
[ti 



Git pointti to SffCoi 

Gtt pointti to flot ttbli 

Git titiiniti fioii fioi lilt tttlt 

llttIB 



Fill; CCLIB.OSI.TEIT 



CCUBkSH 



Page ! 



toio 






(0411 


ZOSf 




0042 


301F 




0044 


S4ir 




004i 


5340 




0040 


iDlC 




004A 


9C40 


0005 


od4e; 


iCU 




0050 


core 


0004 


0054 


0640 


OOOC 


0050 


2i7S 


0100 


iOSC 


22i! 


OOOC 


OOiO 


irsi 


QOOl 


00i4 


600! 




OOii 


4227 




00i( 


4CD0 





OOiA 




OOit 20 




OOiC S4 




OOiE 22 


70 0100 


0072 22 


69 0014 


007i 30 




0070 24 




007* CO 


FC 0020 


007E D5 




0080 22 


49 0002 


0004 14 


it 0002 


0006 70 




OOOA BS 




OOOC i7 


00 0004 


0090 70 




0092 IF 




0094 4E 


DO 



; OSSLTTYFE - G«t deTici tfpe foi slot Unction 
, FUNCTION OSsHTrpc (slot: integer): siotttiie, 



OSsltTfpe 




■o?e. 1 


tspU.tO 


ao«e.w 


(ip)t,dO 


iddq.l 


02, sp 


subq.w 


01, dO 


bit. I 


slttfpO 


cipi .w 


O.iio 


bge.s 


sittirps 


lulu 


(STinfol,d(l 


iddi.w 


fSTinlo.dO 


>o«e. 1 


p3;sC<ii.w,il 


love. 1 


SCslttbliall.il 


lote.b 


STIype<il,d0.w),-(sp! 


bri.s 


sltt|p9 



slttjpO clc.b -(sp) 
slttrp9 jip (iD) 



iSiit [etuin addiess 

,Cel slot nDibei 

liveiote function lesult ftoi siict 

iCospute oflist into slot tibie 

iLrioi tetum il slot not viiid 

J ft 

,Cciot leluin if slot not vilid 



,Cel pointei to SjsCoi 
,Get pointer to slot tiblc 
,Get slot type for slot 
.iletgrn 

,Sit slot type to no derice 

, Return 



OSEXTCBT - Check for eilernil CRT function 
FUNCTION OSiftCRT: boolein; 



OSmICRT 




■OTe.l 


(sp)4,iO 


iddq.l 


I2,5p 


■ove. 1 


pSysCoi.w.il 


■Oft.l 


SCdevtibliD.il 


■ove.w 


liDt.dO 


lOTe.I 


ll,42 


■ulu 


OUTlen.dO 


iddi.l 


d0,a2 


uve.l 


llTiod[f(<U,al 


lote.I 


UTiodi«(a2l,a2 


■oveq 


ti,dO 


cipa, I 


tl,a2 


beq 


eicrti 


loieq 


t'^,dO 


eictti io?e.b 


dO,-(sp) 


)»p 


(lOI 



,Saie return address 

,Reioire function result irok stick 

;Cet pointer to SysCc* 

,Cet pointer to deiice table 

,Get nuabet of devices 

iCoapute last deuce pointer 



,Cet driver pointers 

;» 

,Assuae TRUE 

,DiMer (01 : driver [HAIDEVP 

;Ies, return 

;Set FALSE 

,Set function result 

, Re t u r n 



Flit CCLIB.GSl TEIT 



CCllBtSN 



Figi 10 



con 

eon ::;( oiio 

con inf OOK 

an 3FS1 0004 

30A2 4E7S 



OOM 






IDAI 






OOti 






lOAi 






OOAt 




goo< 


lOAC 







OIBO 
COBO 
0OB2 
00B4 
00B« 

eoBi 

DOBC 



0001 



OOBE 

lOBE 42i; 

00C3 ilD4 

10C2 30ir 

D0C4 S341 

lOCi 3r40 0004 

OOCA 4E73 



OSaiiDt* - Get iiiiaoi dtiici nualiii fonction 
rUKCTIOK OSitiDti. totiftt; 
OSbiiOii 



Ufi.I pSjfCoi N,il 

io<t.l SCdcittb(il),il 

■OTI w (ill,4(fp) 
iti 



,Gtt pointii to S|iCoi 
iCtt pointei to defict tibli 
,Cit noibei of dtiicis 
;Ittoii 



OSdiipDf - Cat DISFLA? diitfi dttict noibii lunction 
FUHCTICH OSdispDf. istigor, 
OSdif;Di 



dr H -dp) 

bit.t OSiiiDk 

lofi.w ($p)t,dO 

■OK.w dO,4(tpl 
rtt 



,Git nuibtc Of diTicts 



Sit functioB itiult 
,itit«tii 



OStfbdIlf - Got (TBD dcirir difico noibtt fooction 
FUNCTION CSl|bdD>. lottgct, 
OSkrbdOi 



Cll H -(Sp) 

but OSuiDii 

loft.v Iip)«,d0 

sobi) II, dO 

■Ofi.v d0,4(ip) 
tti 



,G(t nuibti of dtficos 



,Cit dtfict Boibet 
i3tt fonction itsult 
.Betiti 



OStiiOf - Cll TIHCX driiit deiiei luibei fgiction 
FUNCTION OStltOf. inli«i[, 
OStiiDf 



elc.w -dpi 

but OSiiiDei 

■oft.w <sp)«,dO 

lobq 12, dO 

aoii.v dO,4dp) 
tti 



,Gtt nntbii of diticis 



,Cit difict a»bi[ 
;3il function malt 
;Bltoin 



OSointOt - Cit OKNINCT dtitii diiici niibK fonction 
FUNCTION OSoiniDi. i>ti«ii; 



Filt; CCLIS.OSl.TEIT 



CCIIBASH 



lift 11 



OOCC 

DOCC 42i7 

COCE ilC( 

9IID0 301F 

gOD2 S740 

gOD4 3F4C 0004 

lOOl 4E7S 



OODt 

tODk 42<7 

OODC (IBt 

eODC 301F 

OOEO Sf40 

iOE2 3F40 0004 

0OE( 4E7S 



DOEI 

OOEB 4]i7 

OOEX ilkk 

lOEC 301F 

OOEE 3B40 

lOFO 3F40 0004 

00r4 4E7S 



OOFi 

OOFi 42(7 

OOFI il9C 

lOFt 301F 

OOFC SD4t 

tOFE 3F40 0004 

0102 4E7S 



391« 
3»2« 
3»3' 
3?4« 
3»5« 
376< 
3»7« 
!?B« 
3?9« 
400< 
40t< 
402< 
403< 
404' 
40S< 
40(< 

4or« 

40t* 
40?« 
410< 
41P 
412« 
413* 
414" 
415« 
4U* 
417« 
418* 
41?« 
420> 
421< 
422> 
423« 
424< 
425' 
42i' 
427' 
426' 
42M 
430' 
431' 
432' 
433' 
434' 
433' 
43(' 
437' 



OSoiDlDf 



clt.M -dpi 

bii.s OSiiiDit 

■OTt.N <fp)»,d0 

tubq t)iitO 

■ore.H ilO,4(sp) 
tts 



Ctt nuibei ol devices 



(ill defici luibet 
Sit function iisull 
Ritgin 



0Sdci2Df - Cit 0TAC0H2 dtirtr divici ntibii fonction 

FimCTION OSdeilSi; Utigii, 
I 
0Sdci2D? 



cU.H -ispl 

bits OSitiDci 

lOTI.V <«p)t,dO 

subq 14, dO 

■ove.N d0,4(sp) 
tts 



G«t BOBbic ol diTices 



Cit diiice nuibti 
Set jgnction (csult 
attain 



OSdcilDv - Get OTACONl dtUei deuce nuibet fonclion 
FUNCTION OSdoilDr: intefii; 
OSdcilDf 



cli.w -dp) 

bsi.s OSiiiDif 

lote.N <<p)t,dO 

subq tS.dO 

uve.H d0,4(sp) 
rts 



Set nuibei of devices 



Get device suibei 
Set fonction lesult 
Relotn 



CSsltDv - Get SLOTIO dcivir device nvibei foncticn 
FUNCTION OSsllDv: integen 
OSeltDv 



cU.w -(sp) 

bsi.s OSieiDev 

■ove.w <sp)»,dO 

subq 14, dO 

BOve.H dO,4(sp) 
Its 



Gel nuibei ot deuces 



Get device nuibet 
Set foncticn lesalt 
Retmn 



Fill. CCUE.OSI.TEIT 



CCLIBkSH 



Fig« 12 



0101 








0104 


2r7i 


Olil 


0094 


out 


OitF 


0000 


(04C 


Olio 


0004 






1112 


U75 







0114 

IIH 2071 Olio 

out 2ril 0044 

one 4E7S 



0004 



0l2it 






iOJF 




30ir 




2F0I 




i34l 




2071 




20tl 




2F70 




4E?5 



Olio 
00S4 
0000 0004 













20SF 








t 301F 








COFC 


0020 






1 2F0I 








2071 


Olio 






20tl 


0014 






DlFC 


0000 


0002 




DICO 








DlFC 


0000 


0001 




2F4I 


0004 






4E75 







, pOSnitrlD - Ctt Coaitillitiot uiic ID poistci 
, FUNCTION pOSostrlD; poiatii, 



pOSatttID 

■on. I pSfsCci.w,4(s|i) 
iddi.l ISCaii[ID,4ltp) 

rts 



;C(t pointtc to SyiCoi 
,Gtt pointti tc asei ID 



pOSciiWnd - Ctt cicttit window itcord pointei 
FUNCTION pOScmVnd; pointii, 



pOScoiVBd 

■OTi.I pSffCo^.tfiiO 
■Ofi.l SCcu(tH(ti),4l>pl 
[If 



,Cc( pointor to SfsCoi 
,C<I curitDt window poiitd 
.jtitgin 



; pOSiffVnd - Cit iT>t<a window iieoid pointci 
, FUNCTION pOSi|iVsd (wodibi. iitijtc). pointti; 



possriVid 




■Oft.l 


(spltiiO 


■ott.w 


(ip)»,dl 


■Off. 1 


tl,-(spl 


lil.w 


12, dO 


■0?t. 1 


pSliCoi.w.iO 


■Of I.I 


SCwndlbl(iD),iO 


■eii.l 


0(iO,dOI,4(sp) 


Its 





iSiit ictorn iddrtii 
,Gtt iTitoa window nuibei 
,Resto[e cetiin iddcifs 
,G(I indti to window pointti 
,Ctt polnttc to SfsCoi 
,Ctt pointti to window tibli 
,Ctt window poittei 
,Rttoio 



, pOSdtiNti - Ctt divict 1(11 pointti 

, FUNCTION pOSditNii (antnbi. inttgti): pointti; 



pOSdtiNil 




■Oft. 1 


Itpit.tO 


■Oft.W 


(ip)>,dO 


lalB 


tUTltn.dO 


lOft. 1 


lO,-(ipl 


■Oft.l 


pSisCo^.w.iO 


■Oft.l 


SCdtftibliOl.iO 


iddi.l 


12, lO 


tddi.l 


dO.tO 


iddi.t 


lUTdid.iO 


■Oft. I 


i0,4(ip) 


It) 





,Sttt iitain idditif 
,Cil mil noibti 
iCo^puti tntif indti 
iltttoit tttoii iddiifs 
,Cit pointii to SfiCo^ 
;Ctt pointti to dtfict tibli 
;Cit pointii to dtfict ID 



,Stt fnnctioa iitilt 
,litnrs 



Flic 


CCLIB.QSI.niT 




ecu BASH 








iW 










4«' 


pOSditt - Get srstei ditt poi 








4»4" 










455< 


FUNCTION pOSdite. pointer, 








4fii 




OlSE 






4J7' 


)OSdite 


313C 


2r7! 0180 


0004 


4!8« 


>o?e.l pSisCoi.H,4(spl 


Dli4 


OitF 0009 


0020 


49«« 


iddi.l «SCtodir,4(sp) 


mu 


0004 








ouc 


4E7S 




S00> 
501« 


Its 



Fife 13 



;Cet pointer to SfsCoi . 
,Get pointer to systei dite 

iRetorn 



Filt: CCIIB.OSI.TEIT 



CCLIEISK 



Figt M 



DUE 2078 Olio 

017Z iOil ODOI 

nn 2070 0009 

0171 4ED0 



017C 2078 Olio 

0110 20il 901C 

0114 2070 0000 

Dill 4ED0 



out 7041 
use (OEO 



HIE 303C 0094 
0192 iODt 



JSVECT - Jiiap to tootiit is sfitti ftctoi 

Fifiiitirf: DO.V - oMiit in ifftii iictoc 

JSVECT KOVE.l (SfsCoi.ViAO , (iO) < >;tcoa 

HOVEL SCitibltdOliAO , UO) > fffMCt 

HOVE. I OUO.DO.Vl.tO , <A0) > ditiied toDtinc 

JHP (AO) , Go to it! 

, JUVECT - Juip to routine in usii foctor 

, Fiiiitttrs: DO.V - olfftt in ti<[ ftotoi 

JUVECT KOVE.l pSisCoi.V.AO , (AO) • >;scoi 

HOVE.L SCgtibU(AO),AD , (AOi > OiCiiict 

HOVE. I 0(AO,DO.VI,AO ; (AO) • dtsued coutmi 

JHF (AO) , Co to it! 



ICCTDII - Riid i diiictotf 

pcocidart igitdii (fvid: iidi fit Mil: dictctor;, iic DiiBlocttd. BooiKn, 
lie fdiino. iitigii; tie DifVtIid. Booiiin), eiteinii, 

ICETDII HOVEQ ISVgttdii.DO 
BRA.S JSVECT 



ZFUTDll - Wcitt 1 didctoiT 

pcoetdgri iputdit (•>[ fdii. dioctoi;: Idxno: inttgoi); 

IFUTDII NOVE.V ISVpaldii.DO 
BU.S JSVECT 



pP^I 



riU. CCIIB.OSI.TEXT 



CCLIBASN 



Hijt 13 



5<l« 



END 



iCTlVC OOgilCODi 


lOEVNDFN 


OOOOOOiO 


SCBOOTDV 


0O0OC03i 


STKHBR 


GOOCOCCO 


UTDID 


90030008 


CIR3C ODOOOCOi 


lOEVNDIV 0000002S 


SCBOCTtW OOO0D02E 


3TTYFE 


OOCOOOOI 


UTOflV 


COOOOOU 


CSATTRl 00000010 


lOEVNOVN 


00000027 


SCCODEJT 


00000022 


SUSPEND 


ococcoc; 


UTIODRV 


00000002 


CSATTSl 00000011 


lOEWNDVR 


00000021 


SCCVRRK 


00000048 


5VBIK10 


00CC0C2C 


UTIEN 


09003020 


CSBFCH OOOOOOOi 


JSVECT 


OOOUE 


SCCURRV 


00000044 


SVCU 


OC00007C 


UTHTO 


ocooooo; 


CSFRSTCH ODOOOCOI 


JUVECT 


OOOnCt SCDEVTAB 


00000014 


SVCLOSE 


00000020 


UTRO 


OOOCOOIA 


CSUSTCH OOOOOOOA 


HHBTBLK 


OOOOOOU 


SCDIRNAH 00000018 


SVCRKPTH 


OOOOOOiO 


UTSi: 


OOOOOOIC 


CSIPCH 00000004 


HMBTDEV 


00000012 


SCFREEHF 


00000004 


SVDELENT 


cocoocn 


UTSIT 


00C09C14 


CSHASK OOOOOOOC 


KHBTDRV 


OOOOOOU 


SCIORSLT 


OOOOOOOC 


SVDSFOSE 


C0CCO03I 


UTSPT 


0OOC0C13 


CSTBUOC 0000(000 


KM8T5LT 


00000014 


SCJTABIE 


OC00OC08 


SVFIFDIR 


00000088 


UTSRV 


ODCOCCiS 


CUSSOK 00000002 


KHBTSRV 


OOOOOOU 


SCKEKHAP 


0O0OOC32 


SVCET 


00000014 


unps 


00300017 


EKRTI UmU 


HHBTSW 


OOOOOOIO 


SCNUHPRO 


00000028 


SVCETDIR OCO00D4I 


UTTVP 


C00000I7 


GRAPHIC 00000001 


HKHICOD 


OOOOOOOC 


SCNSTFRO 


OOOC002i 


SVGETVNM 00000080 


VERT 


OOCOOOCO 


INSHOD 00000002 


HHHIDTA 


00000004 


SCPROCNO 


00000002 


3VINIT 


00000018 


VIDDEFLT O0OC00C3 


INVCURS 0OOQOO03 


miOCOD 


00000008 


3CPR0TBI 


0000002A 


SVKARK 


oooooosc 


VIDSET 


OCC0CCO7 


INVRSE 00000000 


miOOTA 


OOOOOOOC 


5CR00TV 


00000040 


SVKAVAIL 


00C0C044 


VRAFON 


00000004 


lOECLtHF 0000003; 


HOAUTOIF 


00000004 


SCSLTTBl 


0000003C 


3VNEV 


C0000C34 


WRATTRl 


00000020 


ipEFHCCD 00000031 


NOSCROLL 


ooooooos 


SCSUSINH 


OCCOOOSA 


SVDP^N 


OCOOOCIC 


WRAnR2 


00000021 


lOEIOREQ 00000003 


•OSACTSLT 


000000 


SCSUSREQ 


oooooosc 


3VPUT 


OOOOOOIC 


WREASEI 


0090CCOE 


lOEXrBTE 0000003S 


'OSACTSRV 


OOOOIO 


SCSVStN 


OOOOOOIO 


3VPUTDIR 


0000)074 


WRBASEt 


COOOCCIC 


lOENFORV 0000002D 


•0SALT5LT 


000020 


^ SCBrSOUT 


OOOOOOOC 


SVRDCHAR 


COC00028 


WRBITOFS 


OOOCOOIA 


lOCHOBUF 00000017 


•OSAITSRV 


000Q3C 


► SCTODAY 


00000020 


SVRICASE 


C0C00O4O 


VBCHARFT COCOCCCC 


lOEKODSF 00000021 


•OSDCHIDV 


OOOOEI 


h SCUSEXIO 


0000004C 


SVSCHDIR OOC0008C 


VRCURADR 00000008 


lOEHOKTB OOOOOOit 


*0SDCH2DV 


OOCODA 


i SCUTAEIE 


OOOOOOIC 


SVSEEK 


COC0093C 


VRCIIR3I 


COOOOOU 


lOEKOOKN OC00002B 


•OSDISFDV 


OOO0A4 


t SCVRSOAT 00000052 


SVUBUSf 


OOOOOOOC 


WRCKRSV 


00000018 


lOENOPRT OOOOOOiC 


•OSEXTCRT 


OOOCiA 


SCVRSNBR OC0C0C4E 


3VUCIEAR OOCOOOOI 


VRCRORSI 


OOOCCOIC 


lOEHOTIH tOOOOOU 


•OSXyBDDV 


COOCBC 


> SCVNDTBl 


0O0COO5i 


SVUINSTl 


00000078 


WRCRORCT 


OOCOOOIE 


lOENOTRN OOOOOOIS 


«OSHAIDEV 


eooc?( 


stnin 


OC0Ci6f 


3VUREA0 


00000004 


VtHOHEOF 


OOOOOOOC 


lOEFRKlN 0000003? 


<OSOHHIDV 


oooccc 


sintF? 


OOOCiCt 


SVU3TAT 


00000044 


VRHOHEFT CC0000C4 


lOETBlFl 00000031 


•OSSLTDV 


OOOCFi 


STACSIT 


00000004 


3VUWRITE 


OOCOOOCO 


VtCEHCTH 


OCOC0024 


lOETBUO 00000032 


•ossintp 


O0C040 


3TACSRV 


COOCOOCi 


SVVAIOIR 00000084 


VRIHCTHI 


occoooi; 


lOETBUV 00000034 


•OSTIHOV 


OOOOBE 


► STAISIT 


00000008 


SmCHAR 00000024 


VRLNCTHY 009C0014 


lOETIHOT OOOOOOti 


«P03CURVN 


000114 


STA13IV 


COOOOOOA 


SY3BYTE5 


00000184 


VRRCDIEN 000CCC23 


lOEUIOFH 0000003( 


•POSOATE 


OOOISC 


STBTSIT 


oocoooco 


SYSKIBDF 


00900U4 


WRSTATE 


OC0CO022 


lOEVNDBE 00000021 


'F03DEVNA 


000131 


STBTSRV 


00000002 


SKSWIN 


OOOOOOOS 


•ICETDIR 


C0C1IA» 


IPEUNDCS 00000022 


•POSSTSm 


000120 


STINFO 


OOOOOOOC 


UNDSCR 


OCOCCOOI 


•IPUTDIR 


C0D18E> 


lOEWNDDC 00000023 


•POSVSERI 


000104 


STINFOl 


00000004 


ITTBtr 


OOOOOOOi 






lOEWHDDS 00000024 


FSYSCOH 


OOOOOIIC 


STMDRV 


00000002 


UTBU 


COOOCCIC 






i trttii. 542 linti. 

















NOTE 

THE EXAMPLES IN THE FOLLOWING TWO SECTIONS ARE 
EXAMPLES ONLT^. THEY DO NOT REFLECT THE CURRENT 
OPERATING SYSTEM. 



Fill. TIHED.DRV.TEIT 



Ftgt 1 



(iU 
dtte 



tiitr.drt.tiit 
2«-SEFTCHBER-H8! 



U 



INCLUDE FILES VSED : 
tiitt.clt.tdt 
/ecot/o>.gH isi. teit 



,HiS CALANDER CLOCK CODE 
,0S GLOBAL EQUATES 



04-23-11 

04-13-12 
0(-O7-l2 



07-07-I2 
07-07-12 
07-20-11 



Addtd Ttisieo diti before TIHERDRV - enliy pout 

Chingcd lORESULT definitions to ose the jUbil iile definitions 

RfiOfed ToI«« ntie fro* tiier otk. test include 

Chinged for new rei. 4 processor boird cbinges, will find the 

correct address to ost (either $30FEl or S30FI1I 

idded storige loc to site coirect iddress 
Added Neider to driver 

Filed error U equites for different ret boird iddreis iquetes 
Chitfed write clock to stop/slirt clock in order to tero 

seconds end tenths fields (in TIHER.CLK TEITI 



INCLUDE OS CLOBALS HERE 
LIST OH 



Till TIMER DRV TEIT 



2Si* 



Figt ] 



fill: TIMER. DRV. TEIT 



Fift 3 



00000000 
00000001 
00000002 
00000003 
00000004 

ooooooos 

OOOOOOOi 
00000007 



00000074 



oooooooo 

00000002 
OOOOOOOi 
OOOOOOOI 
OOOOOOOX 

ooooooos 



oooooooo 

OOOOOOOI 
00000002 
000000(3 



oooooooo 

00000002 
00000004 



oooooooo 



00030F77 
00030r7D 
00030F7I 
00030F(D 
I0030F<F 
00030Ft9 
OOOStFiB 
00S30F?! 
00030F73 



EQUATES FOR All TIMER DRIVER SOFTWARE 



BIT NUMBER DEFINITIONS 



BITDO 


EQU 


BITDl 


EQU 1 


BITD2 


EQU 2 


BITD3 


EQU 3 


BITD4 


EQU 4 


BITDS 


EQU S 


BITDi 


EQU I 


BITD7 


EQU 7 



TIMER INTERRUPT VECTOR ADDRESS 



VECTOR 


EQU 


$000074 


, TIMER TABLE INDICES 




TFLAGS 


EQU 





PTRU5RTN 


EQU 


2 


TCOUNT 


EQU 


i 


TDWHCNT 


EQU 


I 


REGA4 


EQU 


TDWNCNTW 


RECAS 


EQU 


RECA4t4 



; TIMER TABU FLAGS BIT DEFINITIONS 

f 

VALIDENT EQU BITDO 

COHTISHT EQU BITDl 

SKIFIST EQU BITD2 

ENBLDSBL EQU BITDS 

i 

; BELL FARAHETEl BLOCK INDICES 

FREQ EQU 

FAHERN EQU 2 

DURATN EQU 4 

( 

; INTERNAL FLAG BIT DEFINITIONS 

SHUTOFF EQU BITDO 



S30r77 
S30F7D 
S30r7B 
t30FiD 
l30FiF 
nOFli 
t30FiB 
t3DF7l 
$30F73 



1 VIA ADDRESSES 


i 

ACR 


EQU 


lEi 


EQU 


IFR 


EQU 


TILL 


EQV 


TUB 


EQU 


TICL 


EQU 


TICK 


EQU 


T21L 


EQU 


T2CN 


EQU 



BIT 
BIT 1 
BIT 2 
BIT 3 
BIT 4 
BIT i 
BIT ( 
BIT 7 



; INTERRUPT VECTOR 15 



, TIMER TABLE FLAGS 
.POINFEB TO USER SERVICE ROUTINE 
,1 OF SO MS. TICKS BEFORE CALL 
.WORKING DOWN COUNTER 
iREGISTER A4 SAVE AREA 
.REGISTER A3 SAVE AREA 



VALID ENTRY FLAG 
CONTINUOUS/1-SHOT NODE FLAG 
SKIP FIRST CALL FLAG 
ENABLE/DISABLE FLAG 



.FREQUENCT OF BELL 

.PATTERN OF SPEAKER ON AND OFFS 

iDURATION OF BELL 



.SHUTOFF BELL FLAG 



AUXILLAR{ CONTROL REGISTER 

INTERRUPT ENABLE REGISTER 

INTERRUPT FLAGS REGISTER 

TIMER 1 LATCH LOW 

TIMER 1 LATCH HIGH 

TIMER i COUNTER LOW - READ ONLY 

TIMER 1 COUNTER HIGH 

TIMER 2 LATCH LOW 

TIMER 2 COUNTER HIGH 



Fill TIMER. DRV. TCIT 



Pt|t t 



gOII3llF7S 



goooDoic 
ooootoie 

OOOODIIEF 
ODD0007F 
OOOOOOCO 
OOOOODFF 
00000010 
D0O0C3S0 
{00OO0C3 
ODOOOOSO 



OOOODOSC 
OOOOOOSJl 
00000002 



OOOOOOBB 
OOOOOORB 
OOOOOOBB 

OOOOOOCC 
OOOOOOOF 
0000003C 

oooooou 

00002700 



00000031 
00000003 
00000032 
00000033 
00000038 



OOOOOOOi 

ooooeoo< 

OOOOiOOl 
OOOtOOOl 
00000000 



SHIFTREG 


EOU 


t30F73 


, VIA lECISTEl VAIVES 




tCRBTTE 


EQU 


(40 


RIJNT2 


EQU 


tio 


ST0PT2 


EQU 


SEF 


DISIBL 


EQU 


J7r 


ENBLTl 


EQU 


SCO 


CLEAR 


EQU 


4FF 


t:iht 


EOU 


t20 


TINE 


EQU 


SOOOO 


TIHEH 


EOU 


TIHE/254 


TIMEl 


EQU 


TIHE-(TIIItH«25i) 



CONTEXT SWITCHING DEFINITIONS 



3PNDFU 


EQU 


SCfMltq 


SFVAITC 


EQU 


SCstKish 


CVIFROC 


EQU 


SCpcecno 


PPTIl 


EQU 


tBB 


SCHEDFTR 


EQU 


<BB 


SCH0A1 


EQU 


tBB 


SCHOAS 


EQU 


SBB 


PTIEH 


EQU 


JCC 


HUNREGS 


EQU 


ts 


PTPC 


EOU 


NUHRECS'1 


PT5R 


EQU 


PTPC*4 



SCHEDSR 



EQU 



12700 



, lORESUlT ERROR C0DE9 

IHVPRN EQU lOEaieu 

NOTLEGIT EOV lOEioiiq 

IKVTIIIO EOU lOEttlid 

TBLFULl EQU lOEtblfl 

INVFHC EQU lOEfieed 

i KISCEILANEOVS EQUATES 

f 

UKHCHO EQU 

ENAilEC EQU 

CARRIST EQU iCl 

ON EQU 

OFF EQU 



iSHIFT REGISTER 



ACR DATA - Tl FREE RUM DISAilE PS? 
MASR TO COUKT DOW T2 
COHPIEHEKTED RUHTl TO BTOP Tl 
DISABLE ALL INTERRUPTS 
ENABLE IRQ FOR Tl 
CLEAR AIL IFR STAT BITS 
TIMER 02 INTERRUPT FLAG BIT 
30,000 MICRO SECONDS 
HI OI)DER BYTE OF TIKE VALVE 
,LOV ORDER Bne OF TIME VALUE 



SUSPEND FLAG 

WAIT SUSPEND COUNTED SEMAPHORE 

CURRENT PROCESS I INOEI 

FTR TO PROCESS TABLE 

FTR TO ENTRY OF SCHEDULER 

REG. ki VALVE FOR SCHEDVIEI 

REG. A] VALVE FOR SCHEDULER 

LENGTH OF PROCESS TABLE EHHT 
NUMBER OF REGISTERS SSAVEO IN FTBL 
PROCESS TABIE-PC FIELD 
PROCESS TABLE-SR FIELD 

iSCHEDVlER SR-KO IKTERIUFTS 



INVALID VNIT IfO PARAMETER 

NOT LEGITIMATE CALL 
INVALID TABLE ENTRT ID 
TIMER TABLE FULL 
Isiilid fiBctloB ce4< 



UNHOVKT COMMAND CODE 
ENABLE FONCTIOH CODE 
CARRT SET IN CCR 



rili: TIMER. OSV. TEXT 



Fig< 3 



TIHER ItrrCBKUFT SERVICE ROUTIHE 
INTERNAL REGISTER USEACE . 

AO - TEHF 

Al - TEHP 

Al - TIKES TABLE ADDRESS 

A3 - ADDRESS OF iIURREHT EKTRT'S FLAG'S LOW ORDER RHE 

DO - TEHF 
Dl - TEMP 
02 - IHDEt TO CURIEKT ENTRV IN TIMER TABLE 



ril«; TIHEB.ORV TEIT 



Figi i 



ODOt 

OOOt 48E7 FFFE 

0004 io3f oto3 on* 



0001 49FA im* 
OOOE 4212 



0010 47F2 2001 
0014 0113 lOiO 

0011 i734 

OOU 0813 0003 

OOIE U2E 



0020 0472 0001 2001 
002i iCi 

0021 4IE7 2030 
002C 2172 20tt 

0030 2A72 200E 
0034 2072 2002 

0031 4EfO 

003t 4C0F 0CO4 



0O3E 3SB2 200i 2001 



0044 0813 OOOt 

0041 (704 

004t 08?3 0000 



004E 0i42 0012 
0OS2 0C42 0014 
lOSi iiB8 



TIHER IHTERIUFT SERVICE ROUTINE 

THIS ROUTINE IS IHVORED WHEN THE SO HULISECOND IlfTERVtl TIHER INTERRUPT 
OCCURS. IT CHECKS EACH EKTII OF THE TIHER TABLE TO SEE IF IT'S USER SERVICE 
ROUTINE SHOULD BE CALLED. 



TIHIKT 



KOVEH.L 
HOVE.B 



D0-D7/A0-A<,-(SF) 
TlCl.L.DO 



, foi i :« 1 to KUHENTS dc 



LEA 
CIR.L 



TIHERTBL,A2 
D2 



I SAVE USER'S REGISTERS 
;RESET VIA IFR T2 BIT 



; ADDRESS OF TIHER TABLE 
iSTART WITH FIRST EfTTRY 



IF HAVE VALID EHTR! THAT IS NOT DISABLE THEN SEE IF SHOULD CALL USER SERVICE ROUTINE 

TINEIT 



LEA 


TrLAGS»l(A2,D2 


W) 


A3 


ADDRESS OF CURRENT FLAGS * 1 


BTST 


IVALIDENT,(A3I 






VALID ENTRY? 


BEQ.S 


TICKIINET 






NO, SEE IF ANOTHER EHTR? 


BTST 


UNBLDSBL,(A3I 






IS EHTRT ENABLED? 


BNE.S 


TICHKNZT 






NO, SEE IF ANOTHER ENTRY 



GOT VALID EHTRT - TEST IF SHOULD CALL USER SERVICE ROUTINE 



SUBt.W 


ll,TDWNCHT(A2,D2.W) 


DOWN COUNT 


BNE.S 


TICHRNIT 


NOT DONE, SEE IF ANOTHER ENTRY 


HOVEH.L 


DI/A2-A3,-(SF) 


SAVE WORKING REGISTERS 


HOVEA.L 


REGA4(A2,D2.W),A4 


SETUP USERS A4 AND AS 


KOVEA.L 


REGAS(A2,D2.V),A3 


REGISTERS 


HOVEA.L 


mUSRTX(A2,D2.WI,A0 


ADDRESS USER SERVICE ROUTINE 


J3R 


(AO) 


CALL USER SERVICE ROUTINE 


HOVEH.L 


(SF)t,D2/A2-A3 


RESTORE REGISTERS 



; RESET DOWN COUNTER - ASSUHE CONTINUOUS NODE 

HOVE.W TCOUNT(AI,D2.W),TDWNCIfr(A2,D].W) 
; IF ENHY IS IN t SHOT NODE THEN DELETE THE ENTRY. 



BTST 


IC0NT1SHT,(A3) 


BEQ.S 


TICHRNIT 


BCLR 


IVALIDEKT,(A3) 



1 SHOT NODE? 

NO, SEE IF ANOTHER ENTRY 

YES, DELETE ENTRY 



INCREMENT IHSEI - IF NOT FAST EHD OF TABLE THEN DO NEIT ENTRY 

TICHRNIT ADDI.W ITIKTLEN,D2 ; INDEI TO NEIT ENTRY 

PAST END or TABLE? 
NO, DO NEIT ENTRY 



ADDI.W 


ITIKTLEN,D2 


CMPI.W 


ITABIEIN.DI 


BNE.S 


TINEIT 



SEE IF SHOULD DO COKTEIT SWITCH 
B8R.S CHKCS 



i RETURNS (AO) FTR TO SYSCON 



Fill: TIHER. DRV. TEXT Pigt 7 







42i* ; 






4J7» i 


OOSI 


4CDr 7rFF 


42a> 


oosc 


4E73 


Hi* TUHRTE 



BEQ.S DOCS ,DOES OWN EIIT(RTEI 

NQVEH.L (SP)t,Dil-D7/tO-Ai ;RESTORE USER REGISTERS 
RTE ;uscd hj snitanioont 



FiU. TIMER DRV. TEXT 



Fife I 



OOSE 4221 003C 



09(2 3021 00C2 

ooii core lOCC 

OOa 22(1 OCBt 

OOiE 4Sn 0000 

0072 720E 

0074 24DF 

oo7i 51C? frrc 

007k 3S5r 0040 

D07E 3SSF 003C 



0012 2F2I OOIB 

OOli 3F3C 2700 

008t 2Sil OOBB 

OOIE 2A(I OOIB 

0072 4E73 



DOCS - DO COKTEIT SWITCH 

ENTRY . HUST BE 1 GOTO C»IL VIA A JVHF OR BRA KOT A SUBROUTINE 
CALL. NO EXTRA STUFF ON STACK. 
THE TOP OF STACK HUST BE THE USER'S REGISTERS 
(AO) > FOINTEI TO SISCON 



DOCS CIR.B SFNDFIC(AO) 
SAVE EIISTIXC FROCESSES CDOTEIT (PARTIAL, 



DCSKOVR 



KOVE.V 


CURFROC{A0),D0 


HULU 


OFTLEN,Dt 


nOVEA . L 


PPTBL(A0),A1 


LEA 


0(A1,D0.V),A2 


KOVEO 


IHUHRECS-1,D1 


HOVE . L 


(SF)«i(A2)t 


DBF 


Dl.DCSNOVR 


HOVE.V 


(SF)«,FTSI(A2) 


HOVE.W 


(SP)«,PTPC(A2) 



CALL SCHEDULER VIA A FAKED RTE 



HOVEL 


SCHEDFTR(A01,-(SFI 


HOVE.V 


ISCHEDSR,-(SF) 


HOVEL 


SCHDA4(Ae),A4 


HOVEL 


SCHDAS(A0),AS 


RTE 





; CLEAR SUSPEND FLAG 
SCHEDULER DOES REST) 



GET CURRENT PROCESS I 

CALC INDEX TO PROCESS TABLE ENTRT 

ADDRESS OF PROCESS TABLE 

ADDRESS OF ENTRT 

COUKT OF POPS 

;SAVE REGISTERS IN ENTRY 
; IN ORDER DO-A( 

;SAVE SR AND PC OF CURRENT 
i PROCESS 



; ENTRY POIirr TO SCHEDULER 
,SR FOR SCHEDULER 

.SCHEDULER IS A PASCAL GLOBAL SUBROUTINE 
.NEEDS ITS VALUES FOR A4 I AS 



Fill: TIMER. DRV. TEIT 



Fige ! 



00?4 2079 Olio 
0091 4A2I OOSC 
90!C im 



009C U28 OOSA 
OOU i002 



0OA4 7001 
00A( 4E75 



CHXC3 - SEE IF SHOULD DO A CONTEIT SVITCH 

EXIT : (NE) - DOK'T DO CONTEIT SVITCH 
(EQI - DO SVITCH 
(All • POINTER TO SVSCON 

IF (SUSPEND FLAG IS CLEAR) THEN DON'T DO SVITCH 

CHKCS 



NOVE.L 


PSrSCOH.V.AO 


.ADDRESS or SJSCOM 


TST.B 


SFNDFLGCAO) 


IFLAC CLEAR) 


BEQ.S 


CCSDOKT 


lYES 



IF (SUSPEND VAIT COUNTED SEHAFHORE = 0) THEN DO CONTEIT SVITCH 



, FORCE DONT (NE) 





TST.B 


SFVAITC(AO) 




BRA.S 


CCSEIIT 


CCSOONT 


HOVEQ 


«I,DD 


CCSEIIT 


RTS 





tilt. TIKER.DEV.TEIT 



Ftgt 10 



UNIT I/O FMAHETER FtSSINC DEFINITION 



COKHtND UNIT ADDR COUNT BLOCK HODE 

- INSTikU DOW 

- REtD OO.V DM DJ.U DS V 

- WRITE DO.W Dt.L DJ.W 03 W 

- CLCU OO.V 

- BUST OO.V 

- STATUS DD.V DLL Dl.W 07 V 

- UNHOUKT OO.V D7.V 



lORESUlT BUS? 

D7.V 

07. W 

07 .W 

07. W 

07. W Oi.W 



IL REGISTER VALUES ON ENTRV ARE SAVED AND RESTORED EICEPT Oi ( D7. 

NTERNAL REGISTER USCACE : 

Al - TEHF (GLOBAL) 

Al - TEMP (GLOBAL) 

A] - ADDRESS OF TIMER TABLE (GLOBAL) 

A] ■ ADDRESS OF USER'S BUFFER ADDRESS (GLOBAL) 

A4 - ADDRESS OF INTERNAL FLAGS BTTE (BELL) 

AS - ADDRESS OF VIA SHIFT REGISTER (BELL) 

Ai - ADDRESS OF VIA INTERRUPT ENABLE REGISTER (INSTALL) 

Dt - TEHF 

Dl - TEMP 

D2 - COUNT OR CONTROL 

D3 - TABLE ENTRI INDEI 

04 - PATTERN FOR BELL 



Fill: TIKER.DRV.TEIT 



Pitt 11 



OOU 

OOAI iOH 

OOU 00 

OOAB IF 

OOAC S2 n U 00 

OOBO OC 

OOBl S44HD4SS220i472 

OOBt «97iiS72 
OODOOOOC 

OOBE 0C44 OOOi 

00C2 (21C 



00C1 48E7 7EFE 

OOCI 4217 

OOCt 2441 

OOCC 43FA OOlIt 

OODO E34C 

00D2 3131 4000 

OODi 4EB1 4000 



OODA 4CDF 7F7E 
OODE 4E7S 



OOEO 3E3C 0003 
00E4 4E7S 



OOEi 927E 

OOEI OOIA 

OOEA 0100 

OOEC 0014 

OOEE tOOE 

tOFO e2E( 

00F2 02D4 



512 
S13 
514 
SIS 
SU 
517 
Sli 
517 
S20 
521 
522 

S23 
524 

525 
526 
527 
S2S 
329 
530 
531 
532 
533 
S34 
535 
53i 
537 
538 
539 
S40 
541 
542 
S43 
544 
545 
54i 
547 
540 
549 
550 
SSI 
552 
553 
554 
5SS 
55i 



GLOBAL TIHERDBV 
; TIHEB DRIVER 
TIKERDRV 



iilOlD 



BRAS 


TIKROOl 


DATA.B 





DATA.B 


31 


DATA.B 


82,10,22,0 


DATA.B 


hBlei 


DATA.B 


'TIHER diUet 


EQU 


%-iii010 



,*070782> JUHF AROIWD HEADER 

.DEVICE NOT BIOUED 

; VALID CMDS - NOT UNITSTATUS 

;DATE 

.HEADER NSC LENGTH 

^HEADER HSC 



hiliii 

TIHROOl CNFI.V timHCHD.D4 

BHI.3 TIHDERt 

• iiitttxtt* wiil till chanjt (o Di for busy ret 
**•• HOVEN.L DC-DSfAO-Ai,-(SPI 

lltttltti««ttl«>«<lilt<li«*«lit<<*«llilttltll«ttl« 



BOf».I Dl-0(;AO-Ai.-(SF) 

CLR.L 07 

KOVEA.l 01, A3 

LEA TIHDTBL,A1 

L3L.U 11,04 

HOVE.V D(AI,D4.V).04 

JSR 0(A1,D4.W) 

ttiiMitxii wiit till chinge to Di fot bgsT lit 
»**» HOVEH.L <SF)f,O0-O5fA0-Ai 

«ttt«lltt*l<ttilllti«<ltit>ttttl>lltlt«<*ltllt>li<t 

■Ofti.l (SF)f.Dl-Di/AO-A( 
RT3 

Isiilid Couind Ertoi 



; VALID COHMAND 
.NO 

iSAVE REGISTERS 

lillllttKI 

.'** tiip* for bmr ritoiD in DO 
ICLEAR lORESULT 
I ADDRESS OF USERS BUFFER 
iTURN THE COIWAND INTO A 
.INDEX TO THE FUNCTION 



iDO FUNCTION 

, RESTORE SAVED REGISTER VALUES 
ttltltliti 

,<<• ttip' for bos; ittutn io DO 



TIHDERR 



HOVE.V 
ITS 



IN0TLECIT,D7 



THE TIHER DRIVER JUHF TABLE 



TIHDTBL 



DATA.V 


TIHIHST-TIHDTBL 


DATA.W 


TIMRD-TIHDTBL 


DATA.V 


TIKVR-TIHDTBL 


DATA.V 


TIHCIR-TIMOTBL 


DATA.V 


TIHBSI-TIHDTll 


DATA.V 


TIMST-TIHDTBl. 


DATA.V 


TIHUNHT-TIHDVBL 



UNITINI3TALL 

VNITREAD 

UNITVRITE 

UNITCIEAI 

UNITBUSy 

UKITSTATU5 

VHITUNHOUNT 



ril«. TIMER. DRV. TEIT 



Pigi 12 



DDF4 3C3C 0013 

oori tin 



OOFi 3E3C 0003 
OOFE U73 



; TIHBSt - UNITRBUSI 

, IVS! TRON THE TIHEt IS CURRENTLI UKDEFINED. 

TIHBSY MOVE.V INDTLECIT,D7 
RTS 

, TIHCLR - UHITCLCkR 

, CLEAR THE TIHER IS CURRENTlt UHDEFINED. 

TIHCIR HOVE.V IN0TLECIT,D7 
ITS 



Fill. TIMER. DRV. TEIT 



Ptgt 13 



571 
S72 
573 
574 
575 
S7i 
577 
S7I 
579 
SiO 
581 
512 
583 
514 
595 
586 
587 
588 
587 
570 
571 
572 
593 
594 
S!S 
59i 



TIHVR - UKITVRITE 
TIHRD - UKITREUD 

CODE FOR CUkNDER ClOCK ; IN INCLUDE FILE iimei .dk. teit 



INCLUDE 



'TIKER.CIIC.TEIT' 



filt 
ditt 



tiBec.dk.tiit 
22-OCTOBES-19I2 kb 



FILE IS AK INCLUDE FILE FOR TIMER. DRV. TEIT , THE TIMER DRIVER. 

THIS IS THE UNITREIhD AND UNITVRITE CODE FOR THE CALENDER CLQCH IN THE 

TIMER DRIVER. 

04-23-82 kb Chinged lORESULT definitions to use the giobil file definitions 
0(-07-l2 kb Chinged lor new ret. 4 piocessot boird changes, will find the 

correct eddress to use (either i30FEl or t30F81) 
07-07-12 kb Chinged error in RV3 end RV4 iddress eqoites, were reiersed 
09-20-82 If Changed write clock to stop/stirt clock in order to lero 

seconds and tenths fields 
10-22-82 kb Changed READCR to It reads 4 tiiet with a NOVEF.L instruction. 

Checks to take sore the low order 3 bytes, all eicept the 

first read are the saie. If the; are not it rereads the 

register. 



ril€ TIKES DRVTEIT 



Ft9i 14 



00000000 
00000002 
00000004 
OOOOOOli 
OOOOGOOI 
OOOOOOOA 
OOOOOOOC 
OODOOOOC 

OOOOOOOE 
00000007 

00000010 
00000001 



00030FI1 
DOOSOFEl 
00030D01 
OOOOOOOF 
OOOOOOOE 
OOOOOOOD 
OOOOOOOI 

OOOOOOOF 
OOOOOOIO 



00000037 
0000003! 



• •» 



EQUJiTES FOR THE CLOCK DOVTINES 

FtRUrrEI BLOCK INDICES - lANCE FOR FiMNETER IN FMEKTHESIS 



DATOFVK 


EQU 





MONTH 


EQU 


DAtOFVItl 


our 


EQU 


KONTK«] 


HOUR 


EQU 


DAIW 


HIKS 


EQU 


HOURt> 


SECS 


EQU 


HlNSt2 


TENTHS 


EQU 


SECSf! 


LEAFTR 


EQU 


TENTKSt] 


LENFBR 


EQU 


TEKTHStl 


KUHRP 


EQU 


LENFBR/ 2 


ICNFBV 


EQU 


LEAFIR«1 


HUHVP 


EQU 


lENFBVf2 


, CLOCK REGISTERS 




RV4tDII8 


EQV 


UOFIl 


RV3tDDR 


EQU 


iJOFEl 


RVREC 


EQU 


S3000I 


INTREC 


EQU 


IS 


3TRTST0P 


EQU 


14 


IIREC 


EQU 


13 


TENTH3C 


EQU 


1 


RDERR 


EQU 


JOF 


DSELCT 


EQU 


110 


, lORESULT CODES 




FBLCNER 


EOU 


lOEprili 


ClOCKERR 


EQU 


lOEcIkif 



DAI OF THE WEEK (1-7) 
MONTH (1-12) 
DAY (1-31) 
HOURS (0-23) 
MINUTES (0-5?) 
SECONDS (0-S9) 
TENTHS OF SECONDS (0-9) 
LEAP YEAR (0-3) 

; LENGTH OF READ PARAMETER BLOCK 
.NUMBER OF READ PARAMETERS 

.LENGTH OF WRITE PARAMETER BLOCK 
.NUMBER OF WRITE PARAMETERS 



SELECT/ ADDRESS LATCH ••iiw boitd tddiisi 

SELECT/ ADDRESS LATCH Xold board iddiiss 

READ/WRITE CLOCK REGISTERS 

CLOCK INTERRUPT REG ADDR 

START/STOP REGISTER 

LEAP TEAR REGISTER 

TEKTH OF SECONDS REGISTER (chinot i/71 

;REGISTER VALUE WHEN READ WHEN UPDATE 
/DESELECT CHIP 



; PARAMETER BLOCK WRONG LENGTH 
I CLOCK NOT WORKING 



File TIHER DRV.TEIT 



Fije tS 



0100 
0100 
0102 
0104 
OlOi 
0101 



OlOt 




OOOE 


OlOE 






0110 




03EC» 


out 




03DCt 


out 




04OAt 


one 






OllE 






0120 






0122 




4000 


012( 






0121 




3000 


012C 






012E 






O130 




ID07 


0134 






013i 







0131 3E3C 0037 
013C 4E75 



TIHRD - UNITREAO OF CLOCK 

XETURH TO THE USER THE TINE IK THE REAl-TIHE-CLOCX. 

USER PASSES FARANETER BLOCt POINTER IN 01 OF WHERE TO PUT THE TIHC INFO. 

TIKE IS RETURNED IN BINART, INTEGERS. THE PARAMETER BLOCK HAS THE FORK 



TIHRD 



leckPinat 


til = Kcocd 




DiiofWcik : integer 




Month : inttqec, 




Di; : inttgii; 




Hour . inttger, 




Mins . inttgei, 




Stcs : integet, 




Tenths : integet, 




tndi 


HOVE . L 


Dl,Ai 


NOVE.L 


D2,D4 


BSR.S 


RDCLOCK 


TST.W 


D7 


BNE.S 


TRDEUT 



Ki > PARAMETER BLOCK PTR 
SAVE USER LENGTH 
READ THE CLOCK 

,CAN'T READ CLOCK 



CONVERT AND PUT RESULT IN FARANETER BLOCK 



TROCETP 



CHPI.V 


ILENFBR,D4 


^IS PARAMETER BLOCK LONG ENOUGH 


BCS.S 


TRDERR 


,N0 


LEA 


NUMBER, AS 


,1 OF NIBBLES IN PARAMETER 


LEA 


DETAIL, A4 


^REGISTER ARRAY INDICES 


LEA 


REGARRAT,A3 


, REGISTER ARRAY 


CIR.L 


D3 


;INDEI INTO PARAN BLOCK 


CLR.L 


D4 


, INDEX INTO NUMBER ARRAY 


CIR.L 


D( 


, INDEX INTO DETAIL ARRAY 


NOVE.B 


0(AS,D4.W),D0 


,1 OF NIBBLES PARAMETER 


BSR.S 


CVTOUT 


.CONVERT - RETURNS IN 01 


MOVE.V 


Dl,0IAi,03 V) 


.STORE PARAMETER 


ADDO.V 


«2,D3 


NEXT PARAMETER 


ADDQ.B 


11,01 


,00 7 PARAMETERS 


CNPI.W 


INUNRP,04 




BNE.S 


TRDGETF 


,D0 AGAIN 


RT5 







TRDEIIT 

ERROR - PARAMETER BLOCK THE WRONG LENGTH 

TRDERR MOVE.W IFBLENER,D7 
RT5 



file TIMER DRV TEIT 



?lit U 



013E 
0l40 



7C07 



014! S30t 

0144 iG24 

0I4i 7D0I 

0141 43Fk g4AA» 

014C iUi 

014E I4C2 

Oi:0 S200 

OlSZ 0CO3 OOOD 

0156 an 



SiSI 7D0B 

out 4SFI\ 04!lt 

OlSE DC-.A OOOF 

Ci62 USE 

0U4 51C8 EFFI 

DUI 4E7S 



out 

OUE 



1E3C 
4E75 



003» 



0170 !07A 047Et 
0174 2001 

017i i7Fl 

0171 43Ff 0003 
0I7E 4E73 



ODDI 



RDCLOCK - READ AIL THE CLOCK REGISTERS INTO THE REGISTER ARRAY 



RDCIOCK 



BSR.S 
MOVEQ 



IDADDR 
17, Di 



READ REGISTERS INTO ARRAY 



RDCRST 



RDCREC 



SUBO 8 


11, Di 


BN1.5 


ROCERR 


KOVEO 


11, DO 


lEA 


RECARRAI,A2 


BSR.S 


READCR 


HOVE B 


D2,(Al)t 


ADDQ . a 


11,00 


CNF I B 


IRARDLEN»1,D0 


EHE S 


RDCREG 



,CET CHIF ADDRESSES IN AOtAl 
.COUNT OF FAILURES 



.RETRIED TO HANI TIKES 
^DO = REGISTER i 



,READ A SINGLE REGISTER REURNS IK D3 
,FUT IN ARRAY 

,IF DONE 12 TIMES STOP 
,D0 AGAIN 



HOVEQ 


IRARDLEN-1,D0 


,D0 12 TIKES 


LEA 


RECARRAY,A2 




CHFI B 


IRDERR,U2)t 


.SAD 


BEQ.S 


RDCRST 


.YES. REREAD CLOCA 


DBF 


DCRDDCHK 




RT3 







. IF ANY REGISTER READ = $0F THEN READ REGISTERS VHEN TICKED AND MUST RESTART 



RDDCHK 



. ERROR - CHIP NOT WORKING 

RDCERR HOVE V ICLOCKERB.D? 
RTS 

. LDADDR - GET LATCH ADDRESS IN AO AND RIV CLOCK ADDRESS IN Al 

LDADDR 



HOVEA.L ADDRRECtO 

HOVEL AO, DO 

EEQ S RDCERR 

LEA RWREG.l,Al 
RTS 



GET sKcd iddnss (cliingt ill) 
Ichinqe i/71 
NO CLOCK CHIP - ERROR EIIT (chtngt ill) 



Fill: TIHER.DRV.TEIT 



tifi 17 



mto 


4212 




SU2 


4211 




0184 


1434 


iOtO 


till 


S20i 




OlSk 


1233 


2000 


one 


S300 




0191 


HOE 




019] 


E909 




0194 


1434 


<000 


01!l 


S20i 




019i 


1233 


2000 


019E 


il02 




OUO 


4E7S 





CVOVT - CONVERT REGISTERS TO 1 FARkHETER 

ENTRV : (DO) • I OF REGISTERS TO USE (I OF DETAIL ELEMENTS) 

DETAIKDO > REGISTER TO USE TO HAKE FARAHETER 

(A4) • ADDRESS OF THE INDICES OF RECARRAt FOR EACH PARAKETER 

(A3) ' ADDRESS OF THE REGISTER ARRAY 
EIIT : (Dl) ' FARAHETER CONVERTED 

(Oi) « UPDATED TO NEIT DETAIL ELEMENT FOR NEXT PARAMETER 



CVTOUT 



CVOEIIT 



CLR.L 


D2 




CLR.L 


Dl 




MOVER 


0(A4,D6.V) 


02 


ADOQ.B 


11, D( 




MOVE . 8 


0(A3,02.V) 


Dl 


SUBO.G 


il,00 




BEQ.S 


CVOEIIT 




LSL.B 


14,01 




HOVE.B 


0(A4,Di.V) 


D2 


ADDQ.B 


11, Di 




OR.B 


0(A3,O2.V> 


Dl 


BSR.S 


CBCDBIN 




RTS 







,GCT REGARRAV INDEI 
;UFDATE INDEX 
;F1RST NIBBLE 

;IF NUMBER OF REGS>1 THEN 
;THEN DONE- IS VALID BINARY 

,MOVE TO HI NIBBLE 
.INDEX TO NEXT REGISTER 
; UPDATE INDEI 
;PUT IN LOW NIBBLE 

.CONVERT BCD TO BINARY 



rill TIHCR DRV TEXT 



Fiji II 



OIA 


1212 




lU 


MS 




OIA 


0202 


OOiF 


Olt 


\ EI41 




01A( 




OOOA 


OIB 


D24! 




OIB 


1E73 





CiCDBIN 



CBCDBIN 



CONVERT I BKTE OF BCD (2 DIGITS) TO 1 BTTE OF BINAR! 
EKTRT (Dl) > BCD BYTE OF DIGITS 
EIIT . (Dl) c BINAIT BITE 



,COFV OF BCD 
,LOW ORDER DIGIT 
,HOVE OVER HI DIGIT 
,NAKE lO'DIGIT 
iHARE FULL NUHBER 



CIR.L 


D2 


HOVE . B 


D1,D2 


ANDI.B 


IS0F,D2 


LSR.V 


14, Dl 


HULU 


110,01 


ADD.V 


D2,D1 


RT5 





ril«. TIHEfl. DRV. TEXT 



Fige U 



I1B4 48C7 OEOO 



7««» 
747' 
7il« 
76?" 
770« 
771" 
772« 
!?3< 
774« 
775* 
774« 
777« 



Cbingeil loutine on ill/!2(l2 tb 
READCR - READ CLOCI SECISTE! 

ENTR! : (AO/ = LATCH ADDRESS 

(Al) . R/W ClOCI ADDRESS 
IDO) = REGISTER ADDRESS 
EIIT : (Dl) : REGISTER VALUE READ 

The lorcp.l instiuction works becdUSA tha I/O tddtAss spict ioi the 
clock is not lull; decoded. 



OlBi 


6124 




779« 


OIBA 


IS4? 


0000 


7!0« 


giSE 


108C 


0010 


7«1« 


OICl 


02S2 


OfOF OFOF 7!2« 








743' 








7«4« 








705' 


eici 


78J1 




7a4« 


OtCA 


2A0i 




787« 


ttcc 


1CC5 




7J8« 


gicE 






78?« 


OICE 


COtD 




7»0» 


11 DO 


BCOS 




791< 


giDi 


iiE4 




7»2« 


01D4 


SlCC 


rrri 


793» 


tlDI 


4CdV 


0070 


774« 


tIDC 


4E75 




795« 
7?«« 
797« 
7S8« 
77?< 
BOO* 


OlDE 


7210 




801* 


OIEO 


1200 




B02< 


OlEi 


iOll 




803« 


01E4 


lOBO 




804> 


tlEi 


4E7S 




80S> 



READCR 



RDCRIO 



NOVEH.L D4-D4,-(SF) 



SSR.S 


SELREG 


HOVEF.l 


0(A1),D2 


KOVE.B 


•I]SELCT,(A0) 


ANDI.L 


li0F0F0F0r,O2 



; like (Ute ill b|tei reid iie the sue 



HOVEQ 

HOVE.L 

MOVE.B 



*1, D4 
02, D3 
DS, Di 



RDCR20 



LSR.L 


18, DS 


CKF.B 


DS, Di 


BNE.S 


RDCRIO 


DBF 


D4, RDCRiO 


MOVEM.L 


(SF)t,D4-D« 


RTS 





,sii'e legs 

, DESELECT THEK SELECT ADDRESS 

itetd [eg 4 tiles 

, DESELECT CHIF 

;olei[ hi nibbles of lU bftes 



ignore hi order brie, 1st reid 

si>e reid (line 

coipire 111 to list reid 

ohk neit byte 

ire ihcr the tile! 

No, reid [eg igiin 

Do until checked ill 3 b;tes 

restore regs 




































































, SELREG - DESELECT THEN SELECT CHIF REGISTER 
; ENTRT : (DOJ > CLOCK REGISTER ADDRESS 
(AC) = LATCH ADDRESS 

SELREG 



KOVEQ 


IDSELCT.Dl 


OR.B 


D0,D1 


HOVE.B 


D1,IA0I 


KOVE.B 


DO,(AOI 


RTS 





.DESELECT CHIF Br SEHINC D4 
, SELECT ADDRESS 



filt: TmEH.DBV.TEIT 



Pige 20 



91EI 



OlEI 43F9 0003 OOOl 

OlEE tlTI 0003 OFEI 

01F4 ilU 

OlFi 41F9 0003 OFIl 

OlFC itlZ 



OlFE iMi 
0200 iili 



0202 (100 FFiC 

020( 4210 

0201 4212 

0201 (100 OOK 



020E 700F 

0110 4282 

0212 (17E 

0214 (in 

021( (19C 

0211 (in 

02 It 4E7S 



INITCK - FBOCEDURE CALLED Bf UNITIHSTUl CODE (TIKIHSTI TO IHITULIZE 
THE CLOCB CHIP. 
ISSimES THAT THE FOLLOWING CODE DOES NOT RESET THE CLOCIJ))?!!! 

IKITCLI 

START CLOCK - HUST DO IT FOR BOTH ADDRESSES 



LEA 


RVREC.L, Al 


LEA 


RV3ADDR.L, AO 


BSR S 


STRTCLR 


LEA 


RV4ADDB.L, AO 


BSR 3 


STRTCLK 



FIND CORRECT ADDRESS OF THIS HACHIMES PROCESSOR BOARD 



BSR.S 


FINDADDR 


BNE.S 


INITEIIT 


; INITIALIZE CHIP 




BSR 


LDADDR 


CIR.L 


DO 


CLR.L 


D2 


BSR 


WHITECR 


; CLEAR INTERRUPTS 




HOVEQ 


IIirrRECDO 


ClR.l 


D2 


BSR.S 


WRITECR 


BSR.S 


READCR 


BSR.S 


READCl 


BSR.S 


READCR 


INITEIIT RTS 





,r;v address 


(chingc (/7) 


iDO OLD 


ADDRESS FIRST 


Ichtagc (/7) 
(chiBgc ((71 


,D0 NEW ADDRESS 


(chingt (/71 


; 




(chiigi (/7I 






(chisgt (/71 


BOARD 




(ehiigt (/71 
(cbiDgt 4/71 
(chiagt i/71 


; ERROR 


- NO CHIP 


(chtsgt (/71 



GET CLOCK REGISTER ADDRESES 

REG ADDRESS 

DATA 

PUT IN NON-TEST NODE 



/ADDRESS 
,DATA 

iREAD 3 TIHES TO RESET 



I (chingt ill) 



rilt: TIHER. DRV. TEXT 



Pigt 21 



OllC 7400 
021E im 



0220 7401 

0222 700E 

0224 iUC 

022i 4E7S 











7A03 






7001 






illi 






OCOi 


OOOF 




SiCD 


tru 




0C02 


0007 




i204 






4215 






4E75 






44rc 


0001 




4E7S 





144* 
04S* 
I4i* 
147* 
840* 
147* 
OSD* 
iSl* 
IS2> 
iS3> 
IS4* 
iSS> 
ISi* 
«57« 
ISO* 
IS9< 
tiO* 
Oil* 
162* 
Hi* 
1(4* 

Its* 

I6i* 

017* 
|(|« 
Ii7* 

170* 
871* 
172* 
I73» 
074« 
I75« 
I7i* 
077« 
071* 
07»« 



STOFCU - STOP CLOCK FROCEOURE 

USUNES M AND Al ABE INITIAUZED. 



STOFCLK 



HOVEQ 
BRA. 3 



10, 02 
STIO 



;DATA 



STRTCLK - START CLOCK FROCCOUBE 

ASSUMES AO AND Al ARE INITIALIZED. 



STRTCLK 
5T10 



MOVED 

HOVEQ 
BSR.S 
BTS 



11, D2 

OSTRTSTOF.DO 
VRITECR 



DATA 
ADDRESS 



RDTEKTHS - reid tht tcnthi ct^istei of clock 
EXIT - (NO > READ OK 

(C) > ERROR - WRONG ADDRESS 
<D2I . REGISTEI VALVE READ 



RDTENTHS 



RDTIO 



(07-20-1 
(09-lD-e 
(07-20-1 
(07-20-8 
(07-20-8 
(Of-20-l 
(Oi-07-l 
(04-07-8 
(Oi-07-8 
(04-07-B: 
(07-20-i 
(07-20-8 
104-07-6 
(04-07-0 



HOVEQ 



03, OS 



RDTERR 



HOVEQ 


OTEHTHSCDO 


BSR.S 


REIDCR 


CNFI.B 


ORDERR, D2 


DBNE 


DS, RDTIO 


CHFI.B 


if, D2 


BHI.S 


RDTERR 


CLB.L 


D3 


RT5 




HOVE.V 


ICARRTST, CCR 


RTS 





i CHECK HAI. 4 TIKES FOR CLOCK TURNING 

;tiid linth of ftconds tijistoc 

;do until (no rtid trcoi) o( 
, (tried 4 tiaes) 

;if not t BCD digit then wrong iddriis 
;USE OTHER Addttss 



rUc: TIMER. OHV.TEIT 



Figi 22 



024i 

024< 47Fk 0311* 

0241 43F? 0003 ODOl 

0250 4ir! 0003 OFIl 

D2Si 7101 



0231 

02SI ilCE 

02St iSlE 

023C 0CO2 0001 

D2i0 i70i 

02i2 U02 

02H 3203 

02<i iO02 

0211 4213 

02U 3C3C 7330 





































FFfi 



1271 4IF7 0093 OFEl 
0210 SlCC FFDi 



0214 4273 

02l( 3E3C 0037 

0211 4E7S 



02IC 2ill 
02IE 4217 
1270 4E7S 



FINDtDDR - FINS 1DDU3S OF CHIP'S kDDIESS LATCH. IT IS EITHER RV31DDR OR RV4JIDD1 

DEPENDING ON THE VERSION OF THIS PROCESSOR BOIRD. 
lootiBi iddtd with ill chtBii. 



.WHERE TO SAVE CORRECT ADDRESS 



FINDIDDR 








LEI 


ADDRREG, A3 




LEI 


RUREC.L,AI 




LEX 


RV4ADDR.L,A0 




HOVEQ 


«1,D4 


; CHECK IF 


ADDRESS IN 


AO IS CORRECT 


FllO 








SSR.S 


RDTEHTHS 




BCS.S 


FANIT 




CHPI.B 


If, D2 




BEQ.S 


FAZERO 




MOVE.B 


D2,D3 




ADDQ.B 


11,03 




BRAS 


FA20 


FlIERO 


CLR.L 


D3 


FA20 


HOVE.W 


130009, Di 



, START WITH REV 4 ADDRESS 
,TRY ONLT TWO ADDRESSES 



GET STARTING VALVE 
WRONG CHIP TRY NEXT ADDRESS 
WAIT UNTIL TENTH OF SECONDS 
IS NEIT TENTH ==> D3.B 



{MUST READ AT LEAST TENTH SEC. 
, READ TENTHS VKTIL IT CHANGES OR UNTIL IT TRIED TO LONG 

I 

FA3I 

GET NEIT VALUE 

WRONG CHIP TR! NEIT ADDRESS 

HAS TINE TICUD 

TES, FOUND CORRECT ADDRESS 

READ AGAIN 



BSR.S 


RDTENTHS 


BCS.S 


FANIT 


CHP.B 


02, 03 


BEQ.S 


FAFNDIT 


DBF 


Di, PASO 


, NOT THIS ADDRESS TRT OTHER ADDRESS 


FANIT LEA 


RV3ADDR.I, AO 



DRP 



04, FAll 



i ERROR - NEITHER ADDRESS WORIED 



CLR.L 

HOVE.W 

RT8 



(A3) 
iCLOCKERR, D7 



iSHOW NO CHIP ADDRESS 



; FOUND CORRECT ADDRESS 



FAFNDIT 



mVE.L 
CLR.L 

ns 



At, (AS) 
D7 



Fill: TIHER.D8V.TEIT 



Pigt 23 



02«3 MOO FFtA 

02H 1212 

0291 lOBC 0010 

029C 4E7S 



02;E ilOO FEDO 



02A2 7001 

02A4 4SF11 t34E« 

02Ai t4U 

02At <lEi 

02AC S200 

02AE OCOO OOOE 

02B2 iiF4 

02B4 4E7S 



730« 
?31» 
?32» 

933« 
»34« 

?35» 
93i« 
?37« 
!38« 
?39« 
?40« 
>41« 
742« 
>43« 
7449 
?45« 
94<« 
»47« 
948« 
94!» 
950" 
951« 
952« 
953* 
954» 



VniTECR - VRITE A CLOCK REGISTER 

ENTRY : (DO) > REGISTER ADDRESS 
(02) • DATA 

VRITECR 



BSR 


SCIREG 


HOVE . B 


D2,(A1) 


HOVE.B 


IDS£lCT,(AO) 


RTS 





.DESELECT THEN SELECT REG. 
, WRITE DATA 
;DESELECT CHIP 



VRITEREGS - VRITE THE CLOCK REGISTERS FROM THE 
VRITERECS BSR LDADDR 
VRITE REGISTERS 



VRONER 



HOVEQ 


11, DO 


LEA 


REGARRA?,A2 


HOVE.B 


(A2)«,D2 


BSR.S 


VRITECR 


ADDQ.B 


11, DO 


CHPI.B 


ISTRTSTOF,D0 


BNE.S 


VRONER 


RTS 





REGISTER ARRAY 
^CET CHIP ADDRESSES 

.REGISTER ADDRESS 



.REGISTER DATA 

,VRITE DATA 

{NCIT REGISTER ADDRESS 

,STOP AT START/STOP REG. 



Tilt; TIMER. MV.TEIT 



Pigt 24 



t2Bi 2i41 



I2BI UU 

titk an 

I28C (13C 



02BE ilOO FEIt 

9201 tioo rru 

02Ci ilOO FFil 



t:Ct ilD2 
OICC 4E73 



tZCE 3E3C 003i 
D2D2 4E7S 



TINWi 



SET CLOCK FION FtRUIETEII BLOCK 
PXIMIETEI BLOCK FOB UNITVIITE 



tfpt ViittClockFiriMtir « tte«td 

DifoIViik : iategti, 
Konth . inligtt; 
Di; : inttgir: 
Hon ; iattgir, 
Hint : iitigii, 
Sici : iiligati 
Tiltlii : iDtigir; 
Lttrlcii : iitigii, 
•sd; 

TIKVR NOVEL D1,A3 

FIOCESS ilNUT FtRMICTCRS 



iiigt 

1-7 

1-12 

1-31 

0-23 

i-S9 

0-5f 

«-» 

0-3 



.IDDRESS OF PARAMETER BLOCK 



BSR.S VALIIN 
BC8.S TVRERR 
BSR.S CHBIHR 

ZERO SECONDS AND TENTHS OF SECONDS 

BSR IDADDR 
ESR STOPCLK 
BSR STRTCLK 

, VIITE OUT REGISTER AIRA! 

BSR.S VRITERECS 
HTS 

, ERROR - INVALID CLOCK PARAMETER 

TVRERR HOVC.W IINVPRH,D7 
RTS 



/VALIDATE FARAMS 

,N0 GOOD 

; CONVERT BINARY TO BCD OF REGISTERS 



(07-20-1 

(07-20-1 

GET CLOCK ADDRESSES (07-20-i 

(07-20-1 

(07-20-1 



File TIMER. DRV. TEIT 



Fite 25 



nm 2B1B 

02D( 7107 

t2DI 4BFA 024U 



02DC 4210 

02DE lOlD 

02E9 B054 

02E2 (210 

02E4 lOlO 

02Ei B054 

02EI iilk 

02Et 54tC 

02EC SlCC FFEE 

02F0 4200 

02F2 4E7S 



02F4 44FC 0001 
02FI 4E7S 



??5 
»74 
?»7 
791 
77? 
1000 
1001 
1002 
1003 
1004 
lOOS 
lOOi 
1007 
1001 
1007 
1010 
1011 
1012 
1013 
1014 
lOlS 
lOli 
1017: 
1011 
1017 
1020 
1021 
1022 



ViLBIH - VALIDATE BINARY FARAHETER BLOCK 

EHTRV . (A3) > ADDRESS OF FARAHETER BLOCK 
EIIT : (NCI : GOOD FARAHETERS 

(CI ' ERROR, OUT OF RANGE 



VAIBIN 



HOVEA.l 


A3,A4 


HOVEQ 


INUHWP-1,D4 


LEA 


RANGES, A3 



,SAVE FB ADDRESS 

,D0 ALL I FARAKETERS 

,LIST OF FARAHETER RANGES(ByTESI 



COHFARE EACH FARAHETER TO IT'S LOW AND HI RANGE VALUE 



VBCHK 



CLR.L 


DO 


HOVE.B 


(ASI«,DD 


CMP.W 


(A4I,D0 


BHI.S 


VBERR 


HOVE.B 


(ASU,DO 


CHF.U 


(A4I,D0 


BCS.S 


VBERR 


ADDQ.L 


12, A4 


DBF 


D4, VBCHK 


CLR.L 


DO 


RTS 





, ERROR EIIT - OUT OF RANGE 

VBERR HDVE.W ICARR{ST,CCR 
RTS 



,GET LOW BOUND RANGE 

,FARAH>UOV BOUND THEN OK 

, ERROR, TO LOW 

,G£T HI BOUND RANGE VALUE 

;FARAN(=HI BOUND THEN OK 

, ERROR, TO HIGH 

,NEIT FARAHETER LOV BYTE 

, SHOW NO ERROR 



;5H0V ERROR 



File TIKCI! DRV.TEIT 



Figc ]i 









I024* 
















102S' 


, CVTBINR 


- CONVERT VALID FARAHETER BLOCK FROH BINARY INTO RECARRAt BCD NIBLE5 








103(1 




ENTRY 


(A3) ' ADDIESS OF PARAMETER BLOCK 








1027« 














030«« 


1021' 


cniiNR 


LEA 


HI,A4 


HI NIBBLE HOLD ARRAY 






03gt» 


U2>' 




ISA 


LOW, A3 


LOW NIBBLE HOLD ARRAY 








1D30> 




KOVEQ 


<HVKVP-1,D1 


FOR 1 :° 1 to 1 do 








1031< 
1032< 




HOVEQ 


•LEAFTR*1,D3 


IHDEI TO PARAMETER 








1033> 


CIRNIBS 


CLR I 


DO 








3000 


1034" 




MOVE B 


0(A3,D3.V),D0 


GET PARAHETERIil 








103S< 




NOVE L 


DO, 01 








OOOA 


1031' 




DIVU 


110,01 


HI NIRBIE .:■ FARAH DIV It 








1037< 




HOVEL 


D1,D0 


LOW IS REMAINDER FROH DIV 








1031* 




SWAP 


DO 


LOW .= PARAHETER-(HI»10I 






4900 


103»< 




HOVER 


D1,0(A4,D4.W> 


SAVE HI 






4000 


1040« 




HOVE.B 


D0,O(AS,D4.W) 


SAVE LOW 








1041< 




SUBQ.W 


12,03 


NEXT PARAHETER INDEX 






rfE4 


I042« 
I043> 




DBF 


D4,CBRNIBS 


DOWHTO 








1044' 


, SETUP REGISTER tRRAK 










104S' 


, 








0324 






i04i< 




CLR.L 


D3 


REMOVE GARBAGE 


0321 




03CCt 


1047« 




LEA 


RCCARRAT.AJ 




0321 






1041' 




HOVEQ 


IRAVRLEN-1,D4 


HOVE TO 13 REGISTERS 


032C 




01CS» 


1049' 




LEA 


NIBBLE, A2 


WHICH NIBBLE FOR THIS REG. 


0330 




0104« 


IDSO' 
1051« 




LEA 


INRECB,A1 


WHICH PARAMETER IS REG FROH 


0334 




4000 


U32« 


CBRREGS 


HOVE.B 


0(A1.D4 V),D3 


INDEI TO HI ( LOW FOR THIS REG 


0331 




3000 


1053" 




HOVE B 


0(AS,D3.W),DO 


ASSUME LOW NIBBLE 


033C 




4000 


1034' 




TST.a 


0(A2,D4.V) 


IF THEN USE LOW NIBBLE 


0340 






U55' 




BEQ.S 


CBRULOV 


IS LOW 


0342 




3000 


lOSi' 




HOVE.B 


0(A4,D3.VI,DO 


ELSE GET HI NIBBLE 


034i 




4000 


1057« 


CBRULOW 


HOVE.B 


D0,0{A3,D4.V) 


PUT NIBBLE IN REGISTER HOLD 


034t 




fFEl 


lOSI' 
105J« 




DBF 


04, CBRREGS 




034E 






10iO> 




BSR.S 


CVTLPYR 


CONVERT LEAP YEAR REG 


0350 






lOU* 




RTS 







riU. TIMER. DRV. TEIT 



F191 27 



03S] 102B OOOC 

0331 7203 

0358 7200 

03St 4280 

035C 03C0 

03S£ 1740 OOOC 

03<2 4E7S 



10<3 
1064 
lOiS 
lOU 
10i7 
10<8 
1067^ 
1070 
1071 
1072 
1073 
1074 
1075 



CVTLFtR - CONVERT LEtP YEAR PARAHETER TO THE REGISTER VALUE FOR THE 

ClOCX CHIP. 8,4,2,1 WHERE I IS FOR UAP YEAR AND THE OTHER NUMBERS 
ARE FOR THE TEARS AFTER THE LEAP YEAR. THEREFORE, 4 IS LEAP TEARM, 
2 IS LEAP YEAR»2, 1 IS LEAP yEAR«3 

CVTLFYR MOVE.B LYREC-nA3) ,00 ,LEAP YEAR REC. ' 13(1NDEI02I 

,D0 IS PARAMETER (RANGE 0-31 
;CALCULATE WHICH BIT TO SET 
,BITI :• 3-PARAHETER 
,D0 IS LEAF YEAR VALUE 
,PUT IN REGISTER ARRAY 



HOVER 


LYREG-nA3),00 


MOVEQ 


13, Dl 


3UB.B 


DO, 01 


CLR.L 


DO 


BSET 


01, DO 


MOVE.B 


D0,LYREG-1(A3I 


RTS 





File TIMER DIV TEXT 



Fiji 21 



D3i4 



031* 
036i 



Q3(C 
0371 

0376 
037i 
II37E 
03IS 



G3I2 
0381 



038t 
039C 
D3n 
0391 
03U 
D3A0 
03t2 
03AI 
03Ak 
03B9 



IDF! 0003 0F7D 
ICBC 007F 



4HA 01C0« 

43FA 0:70t 

30BC 0000 

DOFC 1012 
B3C8 



41F* FC7Ct 
21CS 0074 



13FC 0040 0003 

0F77 

13FC OOSO 0003 

OFiD 

13FC OOCS 0003 

OFtF 

13FC O0C3 0003 

OFiE 

13FC OOFF 0003 

0F7B 



03B2 ICBC OOCO 



03Bi iOOO FE30 



1077 
1078 
107? 
1080 
lOil 
1092 
1083 
'1084' 
108S 
lOBi 
1017 
lOBI 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
I09i 
1097 
1098 
1099 
1100 
1101 
1102 
1103 

1104 

UOS 

UOi 

1107 

1101 
1109 
1110 

nil 

1112 
1113 
1114 
lUS 



TIHIKST - VNITIHSTill 

INSTALL THE TIMER IHTERRUFT ROUTINE AND SET UP THE VIA 



TIHINST 



LEA 
MOVE. 



lER.l.Ai 
fDlSABL,(Ai) 



iTURN OFF ALL INTERUFTS ON VIA 



INITIALIZE TIMER TABLE 



LEA TIHERTRL.AO ; ADDRESS OF TIMER TABLE 

LEA TIHERTBL«(TIirFLEN«NUHENTSI,Al ;1ST BVTE AFTER TABLE 



.CLEAR FLAGS OF EACH EITTRy 
;FOIKr AT NEXT ENTRT 
;AT END OF TABLE 
I NO 



TINSTIO 



FUT ADDRESS OF INTERRUPT ROUTINE IN VECTOR 



MOVE.W 


10, (AO) 


ADDA.V 


ITIHTLEN.AO 


CMPA.l 


AO.Al 


BNE.S 


TINSTU 



LEA 

MOVE.L 



SETUP VIA 



HOVE. 



TIMINTiAO 
AD, VECTOR. V 



lACRBTTE.ACR.L 



MOVES ITIKEL,T1LL.L 
MOVE.B ITIKEH,T1LH.L 
MOVE.B lTIHEH,TtCH.l 



MOVE.B 



•CLEAR, IFR.L 



FREE RUN MODE FB7 OUTPUT DISABLED 

TIMER II LATCK LOW 

TIMER II LATCH HIGH 

TIMER II COUNTER HIGH - FORCE LOAD 

CLEAR IFR 



; ENABLE TIMER 12 

MOVE.B ICHBLTl.iAi) ;TURN INTERUFTS ON FOR Tl 

, INITIALIZE CLOCK - SOURCE IN TIMER. CLR. TEXT INCLUDE FILE 

BRA INITCLK ;DOES RETURN WHEN INITCIX DDES 



Fill. TIMER DRV. TEIT 



Pige 2« 



D3BA 

am 13FC oo7r 001:3 

03Ct 0F7D 

03C] 41FA ten* 

03Ci ilCi 0074 

03Ct 4E7S 



, TIMUNHT - UHITUNHOUKT 

i TURN OFF THE VIA INTERRUPTS AND POINT TH? TIMER INTERRUPT VECTOR AT A RTE 



TINUKHT 



HOVE.B IDISABl.IER.l 

LEA TUHRTE,AO 

HOVE. I, AO, VECTOR. V 
RTS 



,TURN OFF AU 1NTERUP73 ON VIA 

,W:TK TIHER INTERRUPT CODE 
.POINT VECTOR AT RTE 



rii( TIMER D»V TEXT 



Fift 30 



03CC iCU 0004 

03D0 (212 

II3D2 4SF« OnC« 

03Di 43FII 0DI2» 

03Dt [341k 

03DC 3431 2000 

03EO 4CF1 2300 



03E4 3E3C 0030 
33EI 4E75 



03EA OOtO 

03EC OOOk 

03EE 004E 

03Fe OOiO 

03F2 0072 



ua7« 

1121' 
il2?« 
1130> 
11311 
1132> 
U33« 
1134' 
1135' 
113«' 
1137« 
1131' 
1139' 
1140' 
1141' 
1142' 
1143* 
1144' 
1145' 
lt4i' 
1147« 
1141' 
IHM 
1150' 
1151' 
1152' 
1133* 
1154' 
1155' 



TinST - l/NITST»TU5 

THIS FFROCEDUtE CONTAINS THE BELL ROUTINE AND THE 4 TIHER TABLE HAHIFVLATION 

FROCEDURES, CREATE, DELETE, DISABLE, AND ENABLE. 

ENTRY 02 - CONTROL CODE USED TO SELECT FUNCTIONS 
A3 - BUFFER ADDRESS = PTI TO PARAMETER BLOCK 



TIHST 



CMPI.V 


lEHABLECDI 


BHI.S 


TSTERR 


LEA 


TIHERTBl,A2 


LEA 


TSTTBL.ll 


LSL.W 


11, D2 


HOVE.W 


0(A1,D1.WI,D: 


JHF 


0(Ai,o: V) 



, iniiiid FoBction Code Error 

TSTERR HOVE.V IINVFNC,D7 
RTS 

, THE TIMER DRIVER JUMP TABLE 

TSnBL 



DATA.W 


TSTBELL-TSTTBL 


DATA.W 


T5TCREI-T5TTBL 


DATA.W 


TSTDELT-TSTTBL 


DATA.V 


TSTDSBl-TSTTBL 


DATA.W 


TSTENBL-TSTTBl 



;VALID FUNCTION CODE 
,N0 

, ADDRESS OF TIMER TABLE 
,TURN THE CONTROL CODE DfTO A 
, IHDEI TO THE FUNCTION 

;D0 FUNCTION 



BELL 

CREATE TABLE ENTRI 
DELETE TABLE EKTB! 
DISABLE TABLE ENTRI 
ENABLE TABLE EHTRI 



riij. 


TIHEIl DRV TEXT 










1157« 








115e« 








115?« 








1160* 








llil* 








1162* 








1U3« 








1U4« 








lliS* 








lUi* 








1U7* 








Itil* 








1U9« 








1170« 


03F4 


4210 




1171« 


03Ft 


4213 




1172* 
1173« 
1174* 
1175* 


03ri 


0132 


0000 3001 


11"4» 


03FE 


i712 




1177« 


040t 


Oi43 


0012 


117«« 


Mi 


S240 




117?« 


040i 


0C40 


OOOA 


lUO* 


040t 


(iCC 




1181» 
1182* 
1183* 
1184» 


1400 


3E3C 


0033 


118S* 


04t« 


i024 




1U6« 
1U7« 
1188* 
1U?» 


0412 


25!B 


3002 


1190* 


041( 


3S93 


300i 


1191« 


04U 


3S9B 


3001 


1152« 


041E 


331B 




1193« 


0431 


OICl 


0010 


1194« 


0424 


0111 


0003 


1195« 


0421 


3SII 


3000 


1196« 


042C 


2SIC 


30U 


1197* 


0431 


25ID 


301E 


1198« 
1199» 
1200* 
1201« 


0434 


3ilO 




1202* 


043i 


4E75 




1203* 



T5TCRE8 



Pigc 31 



CREATE TABLE EHTRV 

ENTRV . A3 > ADDRESS OF PABAHETER BLOCK 

A2 = ADDRESS OF TIMER TABLE 

A< > VALUE VHEN TIMER DRIVER CALLED 

AS = VALUE VHEN TIMER DRIVER CALLED 
PARAMETER BLOCK . 

1) ADDRESS Of USER SERVICE ROUTINE TO INSTALL IN ENTRV (LONGWORD) 

2) COUNT or 50 MILLISECOND PERIODS TO WAIT (WORD! 
31 FLAGS (VORD) - 

bit 01 = CONTINUOUS/ 1 SNOT MODE FLAG 
bit D2 = SKIP FIRST CALL FLAG 
4) RETURN SPACE FOR TABLE ENTRY ID, THE ENTRY NUMBER (WORD) 



TSTCREB 



CIR.L 
CIR.L 



DO 
U3 



.ENTRY t 
.ENTRY INDEX 



FIND AN UNUSED ENTRY IF ONE AVAILABLE 



TCRCKNIT 



BTST 

BEO.S 

ADDI.W 

ADDQ.V- 

CHPI W 

BNE.S 



ERROR TABLE FULL 



MQVE.V 
BRAS 



IVALIDENT,TFLAGSfl(A2,D3.W) 

TCRFOUND .FOUND ONE 

ITim'LEN,D3 .ELSE SEE IF AT END OF TABLE 

II, DO .NEXT ENTRY NUMBER 

IHUHEHTS.DO . IN TABLE? 

TCRCKNXT ,YES 



ITBIFULL,D7 
TCREXIT 



FOUND UNUSED ENTRY - SET IT UP 



TCRFOUND NOVEL 
MOVE.W 
MOVE.W 
MOVE U 
BSET 
BCLR 
MOVE.W 
MOVE . L 
MOVE.L 



(A3)*,PTRUSRTN(A2.D3.W) iPUT IN USER SERVICE RTN AODRES 



(A3),TCOUNT(A2,D3.W) 

{A3)«.TDVNCNT(A2,D3.V) 

(A3)«,D1 

IVALIDEHT.Dl 

lENBLDSBL.Dl 

01.TFLAGS(A2,D3.WI 

A4.REGA4(A2,D3.V) 

AS,RECAS(A2.D3.W) 



.COUNT OF 50 MS. TICKS 

.SET DOWN COUNTER 

,GET FLAGS 

.SHOW ENTRY IN USE 

.SHOW ENABLED 

.PUT IN ENTRY 

.SAVE USERS A4 AND AS REGISTERS 



RETURN TO USER TABLE ENTRY ID (THE ENTRY NUMBERI 



TCREXIT 



MOVE.W 
RTS 



D0.(A3I 



ri.c 


TIMCR 


DSV TEIT 












I20S> 










130i< 










1107* 










I20|i 










i:o«* 










1210> 










1211> 


0431 








1212* 1 


OOI 


i;n 






i213> 


043k 


tS06 






1214« 

1215> 
12U> 
1217' 


043C 


08b: 


0010 


3001 


12il« 


0412 


6004 






12i»« 
1220* 
1221' 
1222' 


1444 


3E3C 


003! 




1223« ; 


0441 


4E7S 






1224« 1 



Pigt 32 



TSTDELT - DELETE TtllE CHTIV 

EHTIIY t3 • ADDIESS OF PUtMETEII BLOCK 

A2 . tODIESS OF TIHER TABLE 
FJlllMIETei BLOCK . 

I) TABLE EKTR! ID, EtmiT I TO ENTRT (VOIID) 



TSTDELT 



BSR S 

ICS.3 



VALIDID 
TDELERR 



,SET IHDEI TO EKTRT 
lis ID VALID) 
.INVALID-ERROR EIIT 



VALID EKTRT INDEI - DELETE ENTRT 



BCLI 
BRA S 



IVALIDEHT,TFLACStl(A3,D3.VI 
TDELEIIT 



NVAIID TABLE ID ERROR 

TDELERR HOVE.V IINVTBIID.D? 
TDELEIIT ITS 



File 


TIMER. DRV. TEIT 


Fi4t 33 










llli* , 










\ll1t ; TSTDSBl - DISABLE TktU ENTRIf 










13IM , ENTRY : t3 > ADDRESS OF PARAMETER BLOCK 










Hit* , A3 ' ADDRESS OF TIMER TABLE 










li30« ; FARAHETER BLOCK : 










I231* , 1) TABLE EKTRt ID, ENTRY 1 TO ENTRY (VOROl 










12321 ; 


tiu 








1233> TSTDSBl ;CET INDEI TO ENTRY 


MU 


illl 






1234* BSR.S VALIDID ,IS ID VALID* 


044C 


iSOl 






t}3S< BCS.S TDSBERR .INVALID-ERROR EXIT 

1231* . 

123?> i VALID ENTRY INDEI ■ DISABLE ENTRY 

I23B* , 


044E 


06F] 


eot] 


3ttl 


123!' BSET iENBLDSBL,TrLACS»l(A2,D3.V) 


04S4 


<oe4 






124II* BRA.S TDSBEIIT 
1241* , 

1242* ; INVALID TABLE ID ERROR 
1243« ; 


04Si 


3E3C 


Ilt32 




1244< TDSBERR HOVC.V IINVTBLID.D? 


ont 


4EJ3 






124S> TDSBEIIT RTS 



Fill TIKERORV TEIT 



Fift H 



C4SC 

04SC tlli 

04SE iSOE 



04(0 3SB] SCOi 3001 
04tt 0IB2 0003 30(1 

04K iOC4 



04iE 3E3C 0032 
047J 4E75 



0474 3M3 



047i tC43 OOOt 
047A UOi 



047C 44FC 0001 
0411 tOOi 



0412 CifC 0012 
04lt 4210 
0411 4E7S 



; TSTEKBl ■ ENMIE TtBlE ENTRV 

EKmy . 13 « ADDRESS OF FkltHETER BIOCI 

kl ' ADDRESS OF TIMER TABLE 
FARAHETER BLOCK : 

1) TABLE EKTRT ID, EKTRI I TO imM (WORD) 



TSTENBL 



B3R.S 

BCS.S 



VALIDID 
TENBERR 



,GET INDEI TO EKTRT 
,IS ID VALID' 
,IHVAL ID-ERROR ElIT 



, VALID ENTRI INDEI - ENABLE EHTR1 AND RESTART DOWN COUNTER 

HOVE.W TC0UNT(A2,D3.V),TDVNCNT(A2,D3.V1 
BCIR IENBLDSBl,TFLACS«l<A2,D3.VI 
BRAS TENBEIIT 

, INVALID TABLE ID ERROR 

TENBERR KOVE.V IINVTBLID,D7 
TENBEIIT RTS 

, VALIDID - VALIDATE TABLE ENTRI ID IN FARAHETER 

ENTRY . A3 > ADDRESS OF PARAMETER BLOCK 
EI IT . 03 > TABLE INDEI 

(C) < INVALID TABLE ENTRV ID 

(NC)> VALID TABLE ENTR! ID 

VALIDID HOVE.V (A3I,D3 , GET TABLE ENTR! ID 

, TABLE EKTRT ID IS THE EKTR! NUMBER - HAKE SURE LESS THAN NUMBER OF ENTRIES IN TABLE 



VALERR 



CHFI.V 


INUKEHTS-t,D3 


; IS INDEI LESS THAN TABLEIN! 


BLS S 


VALCALC 


,TE3, CALCULATE INDEI 


MOVE.W 


ICARRTST.CCR 


,3H0V ERROR 


BRAS 


VALEIIT 





, HAVE VALID TABLE ENTRI 



VALCALC 


MULU 


ITIHT 


LEN,D3 




CLR.L 


DO 




VALEIIT 


RTS 







.CALCULATE INDEI 
, CLEAR CARRT 



Filt; TIMER. DKV.TEIT 



Fige 3S 



e4(t 4BFf OD03 DF7S 

0490 IXBC 0000 

0494 0039 0010 0003 

049A 0F77 

049C tin 

049E 49Ft OI44i 

04A2 0894 0000 



04A( 43FA l\iU 

04AA :roB 

04AC 302B 0004 

04B0 ]i49 

04B3 4tFA 0034t 

04B( IICI 

04BI 3280 

04BA (too FF3I 

04BE 2iSr 

04C0 lAAB 0002 



04C4 0814 OOOt 
04CI (7FA 



04CA lABC 0000 

04CE 0239 OOEF 0003 

04D4 0F77 

04Di 4E7J 



1291 
1293 
1293 
1294 
129S 
129i 
1297 
1298 
1299 
1300 
1301 
1302 

1303 
1304 
130S 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
131S 
13U 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
132S 
132( 
1327 
1328 
1329 



T5TBELI - BELL ROUTINE 

ENTRf : A3 = ADDRESS OF PARAMETER BIOCA 
PARAMETER BLOCK ; 
II FREQUENCT (WORD) 

2) SPEAKER OK/OFF PATTERN (BVTE) 

3) FILLER (BVTE) 

4) DURATION IN SO HIILISECOND PERIODS (VORDf 
INIT VIA FOR FREQUENCY W/O DISTURBING TIMER II 



TSTBELl 



LEA 


SHIFTREC.l.AS 


MOVE . B 


10, (AS) 


ORI.B 


IRUKTi.ACR.L 


BSR.S 


SETT2 


LEA 


1FLACS,A4 


BCLR 


ISHUT0Fr,(A41 



,TURNOFF BELL FOR SURE 

,SET TIHEI «2 AS COUNT DOWN 

,PUT FREQUENCY IN TIMER 



;PUT TIMER ON 



, CALL CREATE TO SETUP ONE SHOT INTERVAL TIMER CALL 



LEA 

MOVE . L 
HOVE.W 
HOVEA . L 
LEA 

HOVE . L 
MOVE.W 
BSR 
MOVE . L 

HOVE . B 

1 WAIT FOR SHUT OFF 

TBELWAIT BTST 
BEQ.S 



IPRHBLK.AI 

A3,-(SPI 

DURATN(A3),D0 

A1,A3 

BELSRVR,AO 

A0,(A1U 

DO, (All 

TSTCREI 

(SPW,A3 

PATTERNIA3),(ASI 



ISHUT0FF,(A4) 
TBELVAIT 



DONE SHUT OFF TIMER 12 AND BELL 



TBELDOHE MOVE.B 
ANDI.8 



IO,(ASI 
IST0PT2,ACR.L 



ADDR OF INTERNAL FARM BLOCK 

SAVE PARAMETER BLOCK ADDRESS 

SAVE THE COUNT 

CREATE EXPECTS PRH BLK ADR IN A3 

BELL SERVICE ROUTINE ADDRESS 

PUT IN PARAMETER BLOCK 

PUT IN COUNT 

CALL CREATE 

BELL PARAMETER BLOCK ADDRESS 

TURN OH BELL 



,DONE? 
,N0 



, CLEAR SHIFT REG TO SHUT OFF BELL 



1330* TBELEIIT 



RTS 



File TIMER DRV TEXT 



Fill H 











1332> 


, 


















1333* 


, SEnj 


- SET TIMER 


•2 TO FREOUCNCt 


IK FAIAHETER 


BLOCK 










1334* 


, 










04CI 


13EB 


OOti 


0003 


133SI 


SEnj 


HOVE.i 


l<A3),T3ll.l 




,SCT LATCH 


04DE 


or?! 


















out 


1303 


0903 


or73 


133«' 




HOVE . t 


<A3),T2CH.l 




;SET COUNTER AND CLEAR IFR 


04EI 


4E7! 






1337« 
,133|t 




RT5 
















133M 


, BEU TIMER SERVICE 


ROUTINE 














1340* 


; 










D4EI 


41FA 


OOFA* 




1341« 


BELSSVR 


LEA 


IFUCS.AO 




,TELl BELL ROUTINE DONE 


D4EC 


OiDD 


0000 




1341* 




B5ET 


ISHVTOFF,(AOI 




,1 TO SHUT OFF SPEAKER AND 


04F0 


4E75 






1343t 




RTS 






.TIMER 12 



File. TIMER. DRV. TEXT 



Fiqe 37 



04(2 


>; OE OA OS 07 Oi 


D4FI 


03 04 03 02 01 00 


04FC 


01 02 02 02 02 02 


0Jt4 


ei 


OSOS 


00 



OSDi 


Oi OS 03 04 04 03 


osoc 


03 02 02 00 01 01 


0312 


07 


0SI3 


00 00 01 00 01 00 


051f 


01 00 01 00 DO 01 


OSIF 


00 



1345« i 

1346« , 

1347« , Dm kRU 

134t* ; CONSTANTS FOR CALANDES ClOCl 

134;> , CONVERSION ARRAtTS BCD TO SINARY/REGISTER TO PARAMETER BLOCK CONVERSION 

1350« , 

1351« DETAIL DATA.B ?, 11,10,8, 7,4,5,4,3,2,1,0 , REGISTERS WHICH MAKE THE PARAMETERS 

1352« NUMBER DATA.B 1,2,2,2,2,2,1 ,1 OF REGISTERS FOR PARAMEETER 

1333« DATA.B ,«••• FILL »•««« 

1354» ; 

1333* ; CONVERSION ARRAYS FOR PARAMETER BLOCK TO REGISTER ARRAY CONVERSION 

1354« , 

1337* INREGB DATA.B 4,3,3,4,4,3,3,2,2,0,1,1,7 ;VKICH PARAM INREGIil (SINARY) 

133SI NIBBLE DATA.B 0,0, 1, 0, 1 ,0, 1, , 1 ,0,0, 1,0 ,VHICH NIBBLE- UHI 



135?« 
13iO> 
136l« 
1342* 



RANGE VALUES FOR CLOCK PARAMTER BLOCK FIELDS, i BITE LOV, 1 BYTE HI FOR EACH 
OF 8 PARAMTER BLOCK FIELDS 



0520 


01 07 


01 oc 


01 IF 


1383* RANGES 


DATA.B 


1,7,1,12,1,31,0,23, 


,5?,0,3»,0,?,0,3 


0S2( 


00 17 


00 3B 


DO 3B 












0S2C 


00 07 


00 03 




13«4» 
1343« 
1384« 
1347* 
1341« 


VARIABLE 
THE TIMER 


DATA AREA 
TABLE - 10 


ENTRIES 






0000 


0000 


OOOO 


136f« 1 


riMEHTBL 


DATA.W 


0,0, 0,0,0, CO, 0,0 


, ENTRY 1 




0000 


0000 


ODoe 














0000 


0000 


oooo 














00000012 




1370« 1 


riNTLEN 


EQU 


*-TIMERTBL 


, lenqth of enUy 




0000 


0000 


oooo 


137l« 




DATA.W 


0,0,0,0,0,0,0,0,0 


, ENTRY t ; 




0000 


0000 


ODOO 














0000 


0000 


ODOO 














0000 


oooo 


oooo 


1372« 




DATA W 


0,0,0,0,0,0,0,0,0 


, ENTRY 4 2 




0000 


0000 


oooo 














0000 


0000 


DODO 














0000 


0000 


oooo 


1373« 




DATA.W 


0,0,0,0,0,0,0,0,0 


, ENTRY » 3 




0000 


0000 


DODO 














0000 


0000 


DODO 














ODOO 


oooo 


OOOO 


1374« 




DATA.W 


0,0,0,0,0,0,0,0,0 


, ENTRY 1 4 




0000 


ODOO 


OOOO 














0000 


oooo 


OOOO 














0000 


oooo 


oooo 


1375« 




DATA.W 


0,0,0,0,0,0,0,0,0 


, ENTRY « 5 




0000 


ODOO 


oooo 














0000 


ODOO 


oooo 














0000 


0010 


oooo 


1374« 




DATA.W 


0,0,0,0,0,0,0,0,0 


, ENTRY 1 4 




0000 


ODOO 


oooo 














ODOO 


DODO 


oooo 













F;it 


TIKER 


DRV T 


EXT 


r.ki 


0000 


0030 


0300 


GSB4 


aooo 


3303 


0333 


:sBt 


0030 


3130 


0300 


05CO 


ODGO 


3300 


COOO 


OSCt 


0300 


0030 


0000 


05CC 


COOO 


3000 


0C03 


DSC! 


0000 


0030 


0000 


052! 


0303 


3000 


0000 


GSOE 


0003 


0000 


0000 




GG3030E4 






3330003k 





Piqe it 



0SE4 
35EC 



SSFO C3G33000 



csr4 

C5F* 



3U0 
CbOl 



3601 

oai 

3i3« 
0il3 



1377« 



137J« 



137»« 



3033 

3003 3300 0000 

00C2 0033 



CO 33 03 00 00 00 
30 33 33 00 00 00 

3-cao3ac 

33 

SIO0333O 

30 



30 33 03 00 00 00 
00 03 

CO CO 30 00 03 33 
3D 03 



DATX.V 



DkTA V 



DATA W 



0,3,0,0,0,0,0,0,0 



0,3,3,0,0,0,0,0,0 



0,3,3,3,0,0,0,0,0 



, ENTRY I 7 



EHTRt I 



1380' TABtELN EQU »-TIMERTJl 

13S1< .NUHENTS EQU TABIELN/TIHTLEN 

I3I2> , 

1383* , INTERNAL FLAGS AND FARAHETER BLOCK 

1314* , 

1383' IFLACs DATA.V 

13!(> IPRHBLK DATA V 0,3,3,3,3 



ENTRY 



.length o! ttble Id bytes 
,i of iitiies in tible 



,U5E ONLY 1ST BYTE 

,BELL USES FOR CREATE CALL 



13e7< 
13tB> 
138!' 
I373' 
i3?l' 
1372« 
;3?3' 
i3»4« 
1355< 
13!6« 
13»7« 

13?8> 
13?»> 
1430* 
1401' 
H02« 
1403« 
1404« 
1405" 



THE ADDRESS AND COUNT ARE SET IN THE BELL ROUTINE - FLAGS ARE ALWAYS 
ONE-SHOT HODE ONLY 

CLOCK DATA AREA 

CLOCK ADDRESS AND SELECT LATCH ADDRESS SAVE AREA 



ACGRREG DATA.L 

, REGISTER ARRAY HOLD 

RECARRAY DATA E 3,0,0,0,0,0,0,0,3,0,0,0 



.(CHANGE i/71 



RARDLEN 
RAVRIEN 



EQU 

DATA.B 
EQU 
DATA B 



%-REGARRAY 


%-iIECARRAV 




, NUMBER OF REGISTERS READ 



iNUKBER OF REGISTERS VRITTEN 
JILL 



, NIBBLE HOLD FOR FARAKETER TO REGISTER COKVERSIOH 
HI DATA.B 0,0,0,0,0,0,0,0 
M3i> LOW DATA B 3,3,0,0,0,0,3,0 



00CD33A8> 



1407< 
1408* 



END 



TIHERDRV 



ACR 

ACRBYTE 

ACTIVE 

ADDRREC 

BELSRVR 

BITDO 

BITDl 

B1TD2 

BITD3 

B1TD4 

B.'TDS 



00030F77 
03031040 
GOOOOOOi 
0003FO« 
3334E8t 
30033330 
33333031 
33333302 
33033333 
00100004 
OOIOOOOJ 



BITDt 

B1TD7 

CARRYST 

CBCDBIN 

CBRNIBS 

CBRREGS 

C8RUL0W 

CCSDOIfT 

CCSEIIT 

CHKCS 

CLEAR 



OOOOOOOi 
00000007 
00000001 
0001A2« 
OOOlOit 
000334* 
00034(« 
00ODA4» 
0300Ai« 
0D0Of4« 
OOOOOOFF 



CLOCKERR 

CLRSC 

CONTISHT 

CSAnRl 

CSATTRl 

CSBFCH 

CSFRSTCH 

CSLASTCU 

CSIPCH 

CSKASK 

CSTBLLOC 



00000039 
OOOOOOOi 
OOQOODOl 
OOOODOID 
OOODOOU 
OOOOOOOi 
00000008 
0000000k 
00000004 
OOOODOOC 
00000000 



CURFROC 

CURSON 

CVOEIIT 

CVTBINR 

CVTLFYR 

CVTOUT 

DAY 

DAYOFWI 

DCSHOVR 

DETAIL 

DISABL 



00003002 
OOOOOOOI 
OOOlAOt 
DDOJFAt 
OOOSSlt 
OODUOt 
00000004 
00000000 
000074f 
0004F3« 
0000007F 



DOCS 

DSELCT 

DURATN 

ENABLEC 

ENBLDSBL 

ENBLTl 

FAIO 

fa:o 

FA30 

FAFNDIT 

FANIT 



00005E« 
00000010 
00000004 
00000004 
00000003 
OOOODDCO 
OODZSIt 
OOOliAt 
003ZiE« 
OD028C» 
00027A« 



File. TIMER. DHVTEIT 



Pige 39 



niiso 


0002i8t 


HHBTBLK 


OOOOOOIA 


SCCODEJT 


00000022 


SVBLKIO 


OO0OO02C 


TENBEIIT 


000472* 


FINDtDDR 


O0S346i 


KHBTDEV 


00000012 


SCCURRK 


00000048 


5VCU 


0000007C 


TENTHS 


OOOOOOOC 


FREQ 


00000000 


KMBTDHV 


00000018 


5CCURRV 


00000044 


SVCLOSE 


00000020 


TENTHSC 


OOOOOOOI 


GRAPHIC 


00000001 


raiBTSLT 


00000014 


SCDEVTAB 


00000014 


SVCRKPTH 


00000068 


TFIAGS 


00000000 


HI 


000i02t 


HMBTSRV 


OOOOOOU 


SCDIRNAH 


00000018 


SVDELENT 


00000090 


TICHKNIT 


00004E* 


HHIEN 


OOOOOOOC 


MNBTSW 


00000010 


SCFREEHP 


00000004 


SVDSPOSE 


00000038 


TIMBSY 


D0O0F4* 


HOUR 


OOOOOOOi 


HHHICOD 


OOOOOOOC 


SCKDA4 


OOOOOOBB 


5VFLPDIR 


00000088 


TIHCIR 


OOOOFA* 


lER 


00030F7D 


WIHIDTA 


00000004 


5CHDA5 


OOOOOOBB 


SVGET 


00000014 


TIMDERR 


OOOOEO* 


IFLtCS 


0OOSE4t 


HKIOCGD 


00000000 


SCHEDPTH 


OOOOOOBB 


SVCETDIR 


00000048 


TIHDTBL 


0O00E6* 


IFR 


00030F7B 


ratoDTA 


00000000 


SCHEDSR 


00002700 


SVGETVNB 


OOOOODSO 


TINE 


OD0OC33a 


IHITCU 


OOOlESf 


KONTH 


00000002 


5CI0RSLT 


00000000 


SVINIT 


00000018 


TINEH 


C00000C3 


INITEIIT 


0002Ut 


NIBBLE 


000313* 


SCJTABLE 


00000008 


SVHARK 


OOOOOOSC 


TIHEL 


00000030 


INREGB 


OOOSOit 


NOAUTOLF 


00000004 


SCHEHHAP 


00000032 


SVHAVAIL 


00000044 


•TIMERDRV 


OOOOAI* 


IHSMOD 


00000002 


HOSCROU 


00000005 


SCNUKPRO 


00000028 


SVNEV 


00000034 


TIHERTBl 


000330* 


INTREG 


OOOOOOOF 


NOTLEGIT 


00000003 


SCNITPRO 


00000026 


SVOPEN 


OOOOOOIC 


TIHINST 


000364* 


INVCURS 


00000003 


NUMBER 


D004FE« 


SCPROCHO 


00000002 


SVPUT 


OOODOOIO 


TIMINT 


000000* 


INVFNC 


00000038 


NUHENTS 


OOOOOOOA 


SCPROTBl 


OOOOOOiA 


SVPUTDIR 


00000094 


TIHROOl 


OCCGBE* 


INVPRH 


0000D03i 


NUHREGS 


OOOOOOOF 


5CR00TW 


00000040 


SVRDCHAR 


0000002S 


TIHRD 


OODIDO* 


INVRSE 


00000000 


NUHRF 


00000007 


SCSLTTBt 


0000003C 


SVRIEASE 


00000040 


TIHST 


0003CC. 


INVTBIID 


00000032 


NUHVP 


00000008 


SC5USINH 


0000003A 


SVSCHDIR 


OOOOOOSC 


TIMTLEN 


OOOOOOU 


lOEClKMF 


0000003? 


OFF 


00000000 


SCSUSREO 


OOOOOOSC 


SVSEEK 


00000030 


TIHUNMT 


0003BA* 


lOEFNCCD 001011038 


ON 


OOOOOOOI 


5CSYSIN 


00000010 


SVUBUSY 


OOOOOOOC 


TIHVR 


0002E6* 


[OEIOREQ 


00000003 


PAHERN 


00000002 


SCSVSOUT 


OOOOOOOC 


SVUCLEAR 


OOOOD008 


TINEXT 


OQOQiO* 


lOEKYBTE 


0000003S 


PBLENER 


00000037 


SCTODAV 


00000020 


5VUIN5TI, 


00000098 


TINSTIO 


000376* 


lOEMFORV 


0000002D 


FPTBt 


OOOOOOBB 


SCUSERID 


OC00004C 


SVUREAD 


00000004 


TRDERR 


000138* 


lOENOBUF 


00000017 


P5YSC0N 


00000180 


SCUTABtE 


OOOOOOIC 


SVUSTAT 


00000064 


TRDESIT 


00C136* 


lOEHODSP 


00000028 


PTLEH 


OOOOOOCC 


SCVRSDAT 


00000032 


SVUWRITE 


00000000 


TRDGETP 


000122* 


lOEHOKYB 


0000002? 


PTPC 


0000003C 


SCVRSHBR 


O0ODQO4E 


SVVAEDIR 


00000084 


TSTBELl 


00048A* 


lOEHOOHN O00O0O2B 


PTRUSRTN 00000002 


SCWHDTBL 


OOOOOOSi 


SVWRCHAR 


00000024 


TSTCRE8 


0003F4* 


lOENOFRT 


0000002C 


PTSB 


00000040 


SECS 


OOOOOOOA 


SYSBYTES 


00000186 


TSTDELT 


000438* 


lOEHOTIH 0000002A 


RANGES 


OOOS20« 


SELREC 


OOOlDEt 


SYSKYBDF 


00000184 ' 


TSTDSBL 


00044A* 


lOEKOTRN 00000013 


RARDIEN 


OOOOOOOC 


5En2 


0D04D8i 


SYSWIN 


00000003 


TSTENBL 


O0D43C* 


lOEFRHlN 00000037 


AAVSIEH 


OOOOOOOC 


SHIFTBEG 


00030r7S 


TICH 


D0030F6e 


TSTERR 


0003E4* 


lOETBLFl 


00000033 


RDCERR 


OOOUAt 


SHUTOFF 


00000000 


TlCl 


00030F69 


TSnBl 


0003EA* 


lOETBLID 00000032 


RDCLOCX 


00013E« 


SRIFIST 


00000002 


TILK 


00030F6F 


TUNRTE 


00OC3C* 


lOETBlIV 00000034 


RDCRIO 


OOOlBSf 


SFNDFIG 


OOOOOOSC 


TILL 


00030F6D 


TWRERR 


0!02CE* 


IDETIHOT OOOOOOU 


RDCR20 


OOOlCEt 


SFWAITC 


OOOOOOSA 


T2CH 


0003Cr73 


UNDSCR 


OOOOOOOI 


lOEUIOFH OD00003i 


RDCREG 


OOOHC+ 


STIO 


000222« 


T2INT 


00003020 


UNHCMC 


00000006 


lOEVHDBE 


00000021 


RDCRST 


G00142i 


5TACSLT 


00000004 


T2LL 


00030r71 


UTBLF 


00000006 


lOEVHDCS 00000022 


RDDCHK 


DOOlSEt 


STACSRV 


OOOOOOOi 


TABIELH 


D000O0B4 


UTBLK 


OOOOOOIC 


lOEWNDOC 


00000023 


RDERR 


OOOOOOOF 


STAISLT 


00000008 


TBELOONE 


0004CA* 


UTDID 


00000008 


lOEWNDDS 


00000024 


RDTIO 


00022Ai 


STALSRV 


OOOOOOOA 


TBELE2IT 


0004D6« 


UTDRV 


00000016 


lOEVNDFN 00000020 


RDTENTH5 


0002281 


STBTSLT 


00000000 


TBELVAIT 


0004C4* 


UTIODBV 


OOOOOOOi 


lOCWNDIW 0000002S 


ROTERR 


OOO240t 


STBTSRV 


00000002 


TBLFULL 


00000033 


UTLEN 


0C000C20 


IDEVNDVN 00000027 


REAOCR 


0001B4t 


STINFO 


OOOOOOOC 


TCOUNT 


00000006 


UTHTD 


00000007 


lOEVNDVffl 


0000002i 


REGA4 


OOOOOOOA 


STINFOL 


00000004 


TCRCKNXT 


0003Fe« 


UTRO 


OOOOOOIA 


IPRHBIK 


DOOSEit 


RECAS 


OOOOOOOE 


STNDRV 


00000002 


TCREIIT 


000436* 


UTSU 


OOOOOOIC 


IDADDR 


ooonoi 


RECARRAY 


0OOSF4f 


STNHBR 


00000000 


TCRFOUND 


000412* 


UTSLT 


00000014 


LEAFYR 


OOOOOOOE 


RUNT2 


00000010 


STOPCLK 


00021Cf 


TDELERR 


000444* 


UT5FT 


00000018 


LENPBB 


OOOOOOOE 


RV3ADDH 


00030FE1 


ST0PT2 


OOOOOOEF 


TDELEXIT 


000448* 


UTSRV 


00000013 


lENFBV 


OOOOOOU 


RV4ADDR 


00030F81 


5TRTCLK 


000220* 


TDSBERR 


000436* 


UTTP5 


OO00G019 


tov 


OOOiOAt 


RUREG 


00030D01 


STRTSTOP 


OOOOOOOE 


TDSBEIIT 


00043A* 


UTTYP 


00000017 


LVREC 


OOOOOODD 


SCBOOTOV 


OOOOOOSi 


SnYPE 


OOOOOOOI 


TDWNCNT 


OOOOOOOI 


VALBIN 


0002114* 


HINS 


OOOOOOOI 


SCBOOTNH 0000002E 


SUSPEND 


00000007 


TENBERR 


00046E* 


VALCALC 


000482* 



file TlhER DRV TEIT 



Figi 40 



VALERR 00047C* 


VERT 


00000000 


VRBASET 00000010 


VALEIiT 0004ll« 


VIDDEFLT 


00000003 


VRBITOFS OOOOOOU 


VAUDENT DDODOOOD 


VID5ET 


00000007 


WRCHARPT 00000000 


VAUDID 000474« 


VRAPON 


00000004 


VRCURADR 00000001 


VBCHK 90e2DC« 


WRAHRl 


00000020 


VRCURSI OOOOOOU 


VRERR 00aiF4t 


WRATTRl 


00000021 


VRCURSi OOOOOOU 


VECTOR 00000074 


URBA5EI 


oooooooe 


VRCRORGI OOOOOOIC 



VRCRORCr 000000 IE 
VRHOHEOF oooooooe 
VRHOHEPT 00000004 

VRiTECR tmn* 

URITEREC 0002!Et 
VRIEKCTH 00000024 
VRINGTHI OOOOOOU 



VRLNCTHY 00000014 
VROHER 0002AIV 
WRRCDIEN 00000023 
VRSTATE 00000022 
IIIDIO DOOOBU 



ermcs 1407 lines 



ASHdK Cross Rtfertnct O.Old 07 Sep 1«I2 Oitc Ho i, 1912 
Cross-Refiieoct listing 
File ID: TIHEIl.DRV.TEIT 

!302 1329 



1393« 
299 



ACS 


303< 


1103 


ACRBTTE 


31i* 


1103 


ACTIVE 


232* 




ADDRREG 


721 


set 


BELSRVR 


1313 


1341« 


BITDO 


2<2« 


28i 


BITDl 


2i3* 


287 


BITI)2 


2i4> 


218 


BITD3 


2(S* 


289 


BITD4 


Hi' 




BITDS 


2»7» 




BITDi 


2a' 




8ITD7 


249> 




CARRYST 


35J< 


878 


CBCDBIH 


750 


75B» 


CBRHIBS 


1033« 


1042 


CBHIEGS 


1DS2* 


10S8 


CBRULOV 


loss 


1057« 


CCR 


171 


1021 


ccsDOirr 


472 


479* 


CCSEIIT 


477 


480* 


CHKCS 


470« 




CLEAR 


321« 


1107 


ClOCXERR 


i33< 


7U 


CLRSC 


243< 




C0NT13HT 


2!7» 


413 


CSAmi 


204> 




CSATTR2 


20<i 




CSBFCH 


200« 




CSFRSTCH 


201« 




CSEASTCH 


202* 




CSLFCH 


1?9» 




CSHASK 


203> 




CSTBLIOC 


19a« 




CURFROC 


331* 


442 


CVRSON 


239« 




CVOEIIT 


743 


751« 


CVTBINR 


977 


1028* 


CVTLFYR 


lOiO 


10<9t 


CVTOUT 


i72 


736« 


DAT 


i04< 


iOS 


OAYOrWX 


il)2< 


i03 


DCSHOVR 


44S< 


449 


DETAIL 


iiS 


1351« 


DISABL 


3n« 


1084 


DOCS 


43l> 




DSELCT 


(2I« 


781 


DURATN 


295« 


1311 


EHABIEC 


3SS* 


113S 


ENBIDSBL 


289« 


392 


EHBITI 


3:o> 


1111 


FAIO 


I93« 


914 


FA20 


900 


902» 



1021 1212 



1282 



921 



1122 
801 937 

119S 1239 nil 



r»30 


Hi* ?U 




FUFNDIT 


10 m* 




FANIT 


95 »0I 


915' 


FtZCRO 


?7 !lll« 




riNDADDR 


24 185* 




FREQ 






GRAPHIC 






HI 1 


!l HOS* 




HHLEN 


n 523« 




HOUR 


OJi iOi 




lER 


04> 1083 


U22 


IFUCS 1 


04 1341 


1385' 


IFR 


05' 1107 




INITCU 


121 1115 




INITEXIT 


25 842* 




IMREGB 1 


50 1357* 




INSHOD 






INTREG 


221 836 




INVCURS 






INVFNC 


50' 1144 




INVPRH 


K' 7?2 




INVRSE 






INVTBLID 


48' 1223 


1244 


lOEClKMF 


if U3 




iOEFNCGD 


iS' 350 




lOEiOREQ 


37' 347 




lOElCYBTE 






lOENFDRV 






IGENOBUF 






lOENODSP 






lOEHOKIB 






lOEKOOHH 






lOEKOPRT 






lOENOTIK 






ICENOTRN 






lOEPRHLN 


H' i32 




lOETBlFL 


iO> 347 




lOETBlID 


59' 348 




lOETBLIU 






lOETIMOT 






lOEUIOPM 


63' 34i 




lOEVNDBE 






lOEVNDCS 






lOEVNDDC 






lOEVNDDS 






lOEVNDFN 






lOEVNDIW 






lOEVNDUN 






ICEVNDVR 






IFRMBIK t 


09 13B(< 




IDADOR 


18 721' 


829 


lEAPYR 


109> ill 


1831 


lENPBE 


HI' m 


i(! 


LENPBV 


il4< (15 




LOV 1 


129 140ii 




IIREG 


i24' 10i9 


1874 


KINS 


lOi' (07 




KHBTBLK 







12(i 



94] 9Bt 



HNBTDEV 


52< 








HMBTDBV 


55» 








HMETSLT 


53" 








HMBTSRV 


5(« 








KMETSV 


51« 








KHHICOD 


SO* 








KHKIDTA 


48< 








HHLOCOD 


49« 








miODT* 


47« 








MONTH 


03* 6D4 








NIBBLE I 


4J 135«« 








NOHUTOLF 


30« 








NOSCROLL 


H' 








KOTtECIT 


H7« 545 


Si2 


568 




NUMBER 


44 135Z« 








NUHENTS 1 


119 itso 


1279 


1381« 




NUMRECS 


3!« 339 


44i 






NUMRP 


12> Hi 








NUNWF 


1S> 1002 


1031 






OFF 


23 35«« 








OH 


53 357« 








PATTERN 


!94> 1319 








PBLCNER 


32< 682 








PPTBL 


32« 444 








P5YSC0M 


71< 470 








PTLEN 


37« 443 








PTFC 3 


39« 340 


452 






PTRU5RTN 


71' 403 


1190 






PTSR 


40< 451 








RANGES 1 


13 1343« 








RARDLEN 


01 70( 


1398« 






RAWRIEN 1 


41 1400« 








RDCERR 


94 7U« 


723 






RDCIOCK 


Si i88* 








RDCRIO 


79« 792 








ROCRiO 


B9« 793 








RDCREC 


98' 702 








ROCRST 


93« 710 








RDDCHK 


09« 711 








RDERH 


27< 709 


870 






RDTIO ( 


if 871 








RDTENTH5 


iS< 894 


907 






SDTERR 


74 878* 








READCR 


198 777« 


139 


840 841 869 




nECA4 


81< 282 


401 


1197 




RECAS 


B2< 402 


1198 






REGARRAY 


a i9i 


707 


947 1047 1397* 1398 


1400 


RUNTZ 


17< 1302 








RV3A0DR 


20' 817 


915 






RV4ADDR 


19> 819 


881 






RVREC 


21« 724 


Bli 


887 




5CB00TDV 


94» 








SCB00TW1 


92« 








5CC0DEJT 


88> 








SCCURRK 


02« 








5CCURRW 


01« 








SCDEVTAB 


84< 








SCDIRNAH 


85« 









SCFREEKF 






SCHDA4 


33(< 


459 


SCHDtS 


335< 


UO 


5CHEDPTR 


333« 


454 


5CHEDSR 


342« 


457 


5CIOB5LT 






SCJTABLE 






SCHEWUP 






5CNUMPR0 






5CNITFR0 






SCPROCNO 




331 


SCPROTBl 






5CR00TW 


10t< 




SCSinBL 






5C5US1NH 


W 


330 


5CSUSREQ 


10«' 


329 


scsrsiN 






SCSISOUT 






SCTODkl 






SCUSERID 


103' 




SCUTABIE 






5CVR3DAT 






SCVRSNBR 






SCWNDTBL 






SECS 




iOI 


SEUEC 




801" ns 


5Enj 


1303 


1335' 


shhtre: 




1300 


SKUTOFF 




1305 1323 


5KIF15T 






5PNDFLC 




43! 471 


SPVAITC 




47i 


5T1I1 




S5i* 


STACSIT 






5TACSRV 






STALStT 






STAISRV 






STBTSIT 






STBT5RV 






STINFO 






5T1NF0I, 






STNDRV 






5TK«BR 






STOPCIK 




?B2 


5TOPT2 




132? 


STRTCH 




120 I54« 


STRTSTOF 




eSi 752 


5n?PE 






SUSPEND 






SVBIKIO 






5VCU 






5VCL0SE 






SVCRKPTH 






SVDEIENT 






SVDSFOSE 






SVFIPDIR 






SVCET 






SVCETDIR 







1342 



913 



5VCETVNM 13 


' 






SVIMIT 11 


1« 






SVKtRI 12 


• 






SVHAVHIL 13 


« 






SVNEV IZ 


1' 






SVOFEK 12 


* 






5VPUT 11 


I 






SVFUTDII) M 


» 






SVRDCHAR 12 


l« 






SVRLEASE 13 


• 






SVSCHOIR 13 


• 






SVSEEI 12 


« 






svueusr u 


• 






SVUClEtR U 


« 






SVUINSTL H 


• 






SVVREAD 11' 


« 






SVUSTAT 13 


l« 






SVUUSITE 11 


» 






SVVAIDIR 13 


« 






SWRCHAR 1 2 


« 






SYSBHES 7 


!• 






SYSIYBDF 7 


1» 






SYSVIN 23 


• 






TICH 30 


P« lllli 






TlCl 30 


l< 3t0 






TILH 30 


n 1105 






Till 30 


« 1104 






T2CH 31 


< 133i 






TZIHT 32 


• 






T211 31 


l> 1335 






TABIEIN 42 


1 13B0* 


1311 




TBEIDONE 131 


!« 






TBEIEZIT 133 


It 






TBEIVAIT 132 


!• 1324 






TBirUll 34 


!' UBS 






TCOKNT 17 


?• 409 


lUl 


12(0 


TCRCKNIT 117 


i< 1181 






TCREUT 111 


i i203« 






TCRrOUHD 117 


? 11?0« 






TDEIERR 121 


1 1223* 






TDEIEIIT 121 


1 1224* 






TDSBERR 123 


S 1244> 






TOSIEIIT 124 


g 124S* 






TDVNCNT 21 


9> 2B1 


377 


409 1192 lliO 


TENBERR US 


12ii« 






TENBEIIT 12i 


12(71 






TENTHS <0 


1* i09 


ill 




tenths: i2 


S< Hi 






TFIAGS 27 


n 3»7 


1174 


119( 1211 1239 


TICHXHIT 3» 


1 3»3 


391 


414 419* 


TIMS! 55 


4 S<2> 






TIHCia 55 


3 Sil* 






TIHOERR 52 


i S4S> 






TIHDTBl S3 


3 530* 


530 


551 SS2 553 


TIME 32 


3< 324 


323 




TINEH 32 


4< 3iS 


1105 


not 


TIHEl 3} 


!• 1104 






tikerdrv si 


I Sti* 


1401 





12(1 



5S4 SS5 SS( 



TiMEHTBl 


3i4 


13SI 


1319 il3S 


TIMINS" 


s:s 


1081 > 




TIHIHT 


;?!' 


1091 




::aRcoi 


!17 


523' 




T!MBD 


:5i 


453' 




TIMST 


S53 


1133' 




TIKTLEN 


!!» 


10S9 


1092 1178 


TIKUHMT 


iSi 


1121' 




TIKVfi 


552 


771' 




t:neit 


3I?< 


421 


' 


TINSTiJ 


10H« 


1074 




TSDERK 


iU 


412' 




rKDEIiT 


iil 


471" 




TBDCETP 


471> 


477 




TSTBEIL 


'.151 


1300' 




TSTCBEB 


lis: 


1171« 


1314 


rSTDElT 


1153 


U12» 




TSTDSBl 


an 


1233« 




TSTENBl 


1155 


12!4« 




TSTEKB 


lUi 


1144' 




TS'ITBL 


113! 


1131' 


1151 1132 


TUNBTE 


fI9« 


1123 




TVRERB 


?74 


7921 




UHDSCB 


111' 






utmCMD 


35«« 


525 




'JTBir 


li3< 






WBLK 


175' 






UTDID 


US< 






UTDRV 


147' 






UTIOORV 


u:« 






UTIEN 


174' 






UTMTD 


i44« 






UTRO 


173< 






UTSI2 


I4(> 






UTSLT 


1471 






irrsPT 


171' 






'JTSRV 


141' 






unP5 


172' 






>nTYP 


171' 






VkUIN 


775 


1001' 




VALCALC 


1Z3D 


1287« 




vtL::RR 


lltif 






VALEXIT 


1293 


1289' 




VALI2ENT 


214' 


390 


415 1174 


VAIIZID 


;:i3 


1234 


1253 1273' 


VBCHX 


1307' 


1013 




V5ERR 


1019 


1013 


1921< 


VECTOR 


273' 


1099 


1124 


VERT 


I37« 






VIODEriT 


:27« 






VID3ET 


214' 






URAPON 


241' 






'JUATTRl 


!2i' 






WRAHRJ 


235' 






VKBASlZ 


:i5' 






VREASE7 


2U> 






■.•R5IT0F3 


::!' 






VRCHARf- 


".11' 







1349' 1370 1310 



287 1370' 1381 



1133 1134 115S 



174 1211 



VRCVSADR 11 
VKCURSI 21 










VRCURSY 22 










VRCRORCI 22 










VRCRORGY 22 










WRHOHEOr 21 










VRHOKEFT 21 










VRITECR 13 


2 131 


«57 


?.n« 


950 


WRITCREC }{ 


2« 987 








VRLEMCTH 2< 










WRLNCTHX 21 










WRLHGTHY 21 










VROHCR 94 


9» 953 








WRRCDIEN 24 










WRSTATE 24 










IllOtt S2 


2« 523 









fii! ORV.DTACON.TfelT 



ilft 1 



fill . dii dticoi. teit 

Tbis IS the dilicci dcirec source 

dite bf lev level 



10/12/82 


tpl 


1 


10/21/82 


• pi 


2 


10/27/82 


tpk 


3 


U/29/82 


It 


4i 


Ol/tS/83 


n 


4e 


Ol/Ci/83 


kb 


41 



01/12/83 



02/0!/83 



kb 



kb 



initial ?er<ioa no pcotocols-notliiD 
tided auto line feed flag on writes 
HAD!: EtfSt ONLt TELL ABOUT READ BUFFER 
Started adoitions iot protocols and 

coipatibilit; with old printer driver 

uttttstatus interface, 
changed auto line feed flaii iiseage 
addud switcb of water laiks when switch back 

to defaolt read buffer, 
iiied bug in FINDLIN loutine, using 

wrong register for bit test, cbanged 

lit nuBtiet register ftci DO to D5 . 
idded setup of UART base reg in DCTLINT 
in Chklines 



tltlA»t«l«KR«*tt1l«*1tllt1tRt1lltltlltltltlIt«tl«tlltxttXlt«t(1l1t»ttttttltttAt<lttt1ttll1Ititt«t«t 



INCLUDE rues USED : 

Ucos/os.gbl ast.teat 
dcoi.equ.teit 

INCLUDE OS CL0BAL3 UCRE 
LIST 1 
INCLUDE 'DCOK.EQU.TEIT' 



.OS CLOSAL EQUATES 
.definitions for dii«ei 



Fil(. DRV DTICOH.TEIT 



Pigi 



LITTLE VSE) 



00990900 
00090091 
OOOODtOl 
00900003 
90000901 
9909990! 
OOOCDOOi 
0099099? 



00009004 



09099990 
00000001 
00009002 
ODOOOOOl 
1900009* 
00990003 
ggoootot 
00000007 



00000990 



00099991 
09900002 



00009003 



00000909 
90000091 



Egoitis Ur Dati cei iiiitt 

111! , DCOn.EQUTEIT 

dill 24 - Jiniiif - ms 

idjid dtlinition gf LFspiiIlt ii bfti iilui oi UCSD and tppli p-systeis 
■odt (ligf (DSI : 1-24-13 kb 



EQUATES Eon All DATACOn ORIVEt SOFTVARE 
IIT NUKBEI DEFINITIONS 



BITD9 


EOU 


BITOI 


EQU 


B1TD2 


EQU 


BITD3 


EQU 


BIT114 


EQU 


BITDS 


EQU 


BITSi 


EQU 


BITD7 


EQU 



BIT 




BIT 




BIT 




BIT 




BIT 




BIT 




BIT 




BIT 





Fligi lo[ perl coiioi Flig void 
FOBTFLC CQU 81TD0 



,IF THEN INIT POUT ELSE iNIT PORT 1 



Btlfir conlitl libli INTERNAL FUg b;l dtlinilions <<10 BHE*'* BF.IKTL 
[oh oid([ b)te 

ENQFIC EQU B1TD4 ,SENT EKQ WAITING FOR ACK 

Ballti CoDlioi Tibli PROTOCOL flig bit delinilioii ••"U b;ti<<" BFJROF 



,LIN£ TtPE HANDSHAKE 

,I0N/IOFF HANDSHAKE 

.EKQfACK HANDSHAKE 

.LINE IS CT3 

,LINE iS DSR 

,LINE 13 OCD 

.INLINE IS INVERTED(OJ WHEN EUSt 

.ETIfACK HANDSHAKE 



; BUFFER CONTROL TABLE PROTOCOL FLAG BIT DEflNlTiONS '••Hi 8YTE^><BF_PR0r 
PR0T.F2 EQU BITDO 



LINE 


EQU 


BITDO 


lONIOFF 


EQU 


BITDl 


ENQACK 


EQU 


B1TD2 


CTSIIN 


EOU 


BIT03 


DSRLIN 


EQU 


BITD4 


DCDLIN 


EOU 


BITDS 


INVBUSt 


EOU 


BITDi 


ETIACK 


EOU 


BITD7 



H0DK.P2 
N)100_P2 



EQU 
EOU 



EQU 



BITOI 
BITDi 



BIT03 



,IF SET THEN SONE TKPE OF PROTOCOL EIISTS 
,EL3E NO PROTOCOLS -BUFFERS GVERFLOV ETC 
,IF SET THEN A NODEH PROTOCOL EXISTS 
,1F SET THEN NULL NODEH PROTOCOL (PROBABLY OF 

,IF SET THEN FULL DUFLEI (DERFAULTI 
.OTHERWISE HALF OUPLEI 



WRITE BUFFER flig word bit dtlinilions FLAG 1 ->Hd byte 



BUS(_W1 EOU 
ERI.Wl EQU 



BITDO 
BITDI 



.WRITE BUS! FLAG 

.BUFFER SIZE ERROR FOUND IN IKIT INT RTH 



file DRV DTACOM TEIT 



Fi«i 3 



0000000! 
00000004 

ooooooo; 

OOOOOOOi 
00000007 



ocoooooo 

00000001 
OOOOOOOi 
OCOOOtOi 
00000004 



oooocooo 

OOOOOOOI 

ooooooo: 

00000004 

oocoooos 

OOOOOOOI 
00000007 



ODOOOOOO 
OOOOOOOI 

ooooooo: 



00000000 
OOOOOOOI 



000000(4 



00000041 
00000070 



00000000 
OOOOOOOI 
OOOOOOOI 
00000003 



342 

343 
344 

34S 
34i 
347 
340 
349 
3S0 

3sr 

3S] 

353 

3S4 

355 

3Si 

357 

35! 

359 

3i0 

3il 

3(3 

363 

3(4: 

3(5 

3(( 

3(7 

3( 

3(9: 

370 

371 

373 

373 

374 

375: 

37(: 

377 

378 

379 

360 

301 

383' 

383 

384 

38S 

38( 

387 

388 

389 

390 

391 

393 

393 

394 

395 



ilTBf.Wl EQU S1TD3 

OUTE.Wi EQU BITIM 

INPE.Wl EOU BITD5 

OUTC.Wl EQU B1TD( 

INPC.Wl EOU BITD7 

; VRITE SUFFER (U{ Hocd bit definitions 

EUtL.WJ EQU BITDO 

EIIPT.U! EOU BlTDl 

L05T.W3 EQU BITD! 

5NDIF_W3 EOU fiITD3 

AUl[_W! EOU BITD4 



,[F SET(l) HiVC UTERNATE BUFFER TO USE 
,IF DATA FROK BUFFER TO POET EHABIED 
,IF O.DATA FROM USER TO BUFFER ENABLED 
.IF SETd) THEK USER IS CONTROUING OUTE 
.OTHERWISE CONTROLLED INTERNALLV 
,1F SETd) THEN USER IS CONTROLLING INPE 

FLAG 2 -))l(i bylt 

.IF SET (II THEN BUFFER IS FULL 

lIF SET 111 THEN BUFFER IS EHFTt 

,DATA LOST ON INPUT (USER OVERRUNS BUFFER) 

;IF SET THEN SEND AN LF 

ilF SET THEN ilviTS eenil i LF ift«r i CR 



READ BUFFER tUq mti bit deiinitions FLAG 1 -))L0 BVTE 



BUSY.Rl 

EHJJl 

ALTBFJl 

0UTE_R1 

INPE.Rl 

OUTC.Rl 



EQU 
EQU 
EQU 
EOU 
EQU 
EQU 



INPCRl 



BITDO 
ElTOl 
EITD2 
B1TD4 
BITD5 
BITD( 

B1TD7 



READ BUSK FLAG 

UART ERROR FLAG 

IF SETd) NAVE ALTERNATE BUFFER TO USE 

IF DATA FROK BUFFER TO USER ENABLED 

IF DATA FROK FORT TO BUFFER ENABLED 

IF SETd) THEN USER IS CONTROLLING OVTE 

OTHERVISe CONTROLLED IKTERNALIV 

IF SETd) THEN USER IS CONTROLLING INPE 



READ BUFFER fUj wmd til dtfinitions FLAG 2 LO BITE 



EUll.M EQU 
ENPT_R2 EQU 
LOST R2 EOU ■ 



BITDO 
BITDl 
BITD2 



IF SET d) THEN BUFFER IS FULL 

IF SET d) THEK BUFFER IS EKPTV 

DATA LOST ON INPUT (PORT OVERRUNS BUFFER) 



CONTROL CHARACTER BUFFER fUg word til defmitioni LO BHE 



FULl.CB 
EHPT.CB 



EQU 
EOU 



BITDO 
BITDl 



; (8000 Intttiupl Aolo Vtcloi Addicsttt 
VECl EQU t(4 



VEC2 
VEC( 



EQU 
EQU 



«(8 
(70 



,1F SET (1) THEN BUFFER IS FULL 
;IF SET (11 THEK BUFFER IS EKFTV 



,AUTO VECTOR II -DATA COK CONTROL 

;This it Ut VIA used in liat 

.;rotoool< 

lAUTO VECTOR 12-DC I 

/AUTO VECTOR 14-DC 



Unit UO Coumd c«dii --iDuid IN D4.W 



NSTCKD EQU 

READCHD EOU 

VRCND EQU 

CLRCND EQU 



InaliU the unit 
liid oouind 
wtilt couind 
CIEAR THE UNIT 



Tilt MV.DTIICOK.TEIT 



Pigt 



SEE) 

n m iFii) 

LEI 

lEI 

BLE) 

IE) 

FFEB 

FES 



oosooet4 
eoDtogos 

OOOOtllOt 



gootottc 



tooooooo 
toooooei 

SHOOOIDi 
ggOOgOOj 

tocgoioi 

OOtOIIOS 
SOOOOlOi 



OOOtDtO? 
ggOOOOU 
00000009 

gooootot 

ODOOOOOB 

OOOOOOOC 

OOOOOOOD 

OOOOOtOE 

OOOOOOOF 

00000019 

00000011 
00000011 

oooooon 

OOOOOOM 
OOOOOOM 



3n> 

3f7« 
3»l« 
1»9' 

goo< 
goi« 

402< 

403« 
(fl4< 
40S> 

40i> 
407« 

4oe> 

40»« 
410< 
411' 
41J« 
413« 
414> 
415' 
4U> 
417' 
411' 
41»' 
420' 

4il< 



4:3« 

434' 

42S' 
43i< 

427« 

421' 
42>' 
4^0' 
431' 
432* 
433' 
434' 
435' 
434' 
437' 
431' 
43M 
441' 
44 1< 



lUSICHD EQU 
STSCHD EQU 

(IXHCHD Eau 



; ifldt Iltgi -- foafli] in D4.V 
IFfrifdg EQU iOC 

-, . invii comuDs found in di.v 

. (flnctlonf GQKpitibU Hith Aid ptiBtar driver 



Ol.FKEEV EQU 

DlJtUDS EQU 

D!_P«IITY EQU 

D2.FIIEE1I EQU 

D2_CH«IIS EQU 

DI.HAHDS EQU 

02_Brcm EQU 

; itw functieai 



02_ItSTS 
DIJfllSTS 
D2.IEAHI 

D2_IE«10 

OIJUTBD 

D2JKBBD 

D2_0UTWT 

D2JNIVT 

Dl.VBCHIt 

D2 IICHB 



EQU 
EQU 
EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



EQU 
EQU 



112_»Ttr 
D2.BENa 
D2_BD«IT! EQU 
Dl.VTAlTB EQU 
TIliTtTC EQU 



D2_FIIEEV«1 
02JkUDStt 
D2_P»BTr»l 
D2JREEIfl 
02.CHAIIS«1 
D2_KANDStl 



D2jrCTBl*l 

02_RESTStl 

02_W!TS»1 

D2_RE1HI»1 

D2_BEtL0»l 

»2_0UTI1DM 

D2_INBlD4l 

t2_0UTVr»l 

II2_INBVT*1 

D2_VBCHR>1 

02.RBCHfl«l 

D2.»nr«l 

S2.BENa«l 

II2_BD>ITB«1 

D2_tfr»lTB 



&uif couind 

STATUS COKHAND -ACTUAL CQKKANDS IK D2'V 

unioijit cou>n< 



Auto LF iiiipriss bill i or 3 



BETUIW VRITE BUFFED FREE SPACE 

SET READfVRITE BAUD RATE 

SET PAIIT? 

RETURN READ BUFFER FREE SPACE 

SET CHARACTER SIZE 

SET HANDSHAKE NETHOD 

RETURN STATE OF BUFFER CONTROL TAELE 



^RETURN READ STATUS 

; RETURN VBITE STATUS 

,SET READ HI WATER XA>K(NKBR OF CHARS LEFT F 

iSET READ LO WATER KARRINHBR OF CHARACTERS L 

;USER DISABLE OF OUTBOUND READ (BUFFER CISAB 

.USER DISABLE OF INBOUND READ (DEVICE DISAB 

USER DISABLE OF OUTBOUND WRITE (DEVICE OISA 

USER DISABLE OF INBOUND WRITE (BUFFER DISAB 

RETURN THE NUHBER OF CHARACTERS IN VRITE 6U 

RETURN THE KUHSER OF CHARACTERS IN READ lUF 

TOCCLE loto LintFiid flig 

SET loibtr of ckiri bitwiin ENO'i or ETt's 

Sit Riid Altiraili Bitftr 

Sit Vriti Altcttili Bslfir 

Tkt lilt itttni linolion codi 



THE ABOVE IS WILD AND VOOLI AND lUT BE OF LIHLE US TO A SINFIE 
HIGHER lEVEl PROTOCOL-- HIWEVER THE HIGHER lOU GET THE MORE USE 
tONE OF THESE REFOITING FUNCTIONS KA« BE 



ttlllttlli*lttltt"lil"ltttttltillttllllltlt>tllllllll<ltltltllttlttiil«littttl 



Filt DRV DTtCOn.TCIT 



(1)1 s 



iow deiic( inU 



«D DtTi 



tosoMec 

OOOOlttt 

ooDosniig 

000110701 

tooooioo 

COOOOilO 
iSDOOlOO 

goooitot 

KDCJiOO 

eocoiioo 

OOOOOOOl 



tOOSOfii 

ocossri? 
joojor:r 



eoooetis 



too3or:c 
oooottit 

lODOOOOl 
00000093 

otototo: 

00009001 



OOOOOOOO 
OOOOOOOl 

tooooooi 
ogootooi 

00000004 

toooooos 

OOOOOOOi 
OOOOOOO? 



iooooitr 



, ilOOO stilgs Itgisltr iiluii 



VPRKSX 


cau 


UCOO 


STJTEHSU 


EQU 


iiOOO 


THACEHSK 


EQU 


«iCO0 


IliTMJK 


{QU 


i0700 


INK 


EOU 


1400 


INT2 


EOU 


iZOO 


IKTl 


EOU 


1100 


D1S!KT4 


EQU 


)1400 



DISINTZ 



DISINTI 
CARRVET 



EOU 



EQU 

EQU 



WiOO 



12100 
tOOOl 



, VIA Addrexis 

ORA EQU uoru 

OCRA. EQU UOFiT 

NHIRA EQU U0F7r 

VIA ctgiitK iiUK 

iOODIA EQU. 110 



. IICEPS All STATES AHD TIACC IITS AS IS 

, ANDS Ort STATE IIT 

, AKNUS OFF TRACE BIT 

, WDS OFF All IHT ICVEIS 

. INTEiHUPT LEVEL i AND LOVER 

, ETC lEVELt 

,CTC LEVEL 1 

, Diiitle ill DitiCoi (piioiil; 4i <nd bi 

, DISABLE DATACOM I (piiotitr I >ind btltn 

. DiiibU DiuCti-CtiitioI int 
, ecu »itb cirif iit 



PORT A 

PORT A PATA DIRECTION REC 

PORT A VfO HANOSHAlEIICNORt DCRA) 



POST A BIT CONFICUBATIO)! 



UARTDCO 


EQU 


t)0P)0 


tClOFF 


IQU 


no 


DATAREC 


EQU 


1 


STATRl 


Eau 


3 


CHOBCGI 


EQU 


5 


CTIREGI 


(QU 


; 



lART STATUS REGISTER EQUATES 



■tiiii<iiit>ti<illiri<i>ia«iiiiiiiaii<>tiliiit>itili«lf(iltt*litiifitlt>litt>ll 

UART [fgistir dtlinitions 



iBASe ADDICSS OF DATACON t VART 
.amtj FIOH DCO BASE TO DCI BASE 

.DATA PORT HEGISTEB IHDEI 

iSTATUS REGIITCR INDEI 
iCOHHMID lEtlSTtt IND(I 
;CONTR0l lECtSTEB INDEI 



PABITV EIROB IF SET-SELF CLEARING 
FRAMING EIROR IF SET -SELF CIEABINC 
DATA OVEMim IF SET 
RECEIVE REGISTER FUtl IF SET -CUARCD BI RE 



.WRITE lECISTCI ENPTT IF SET 
;DATA CAIIT DETECT IF 10 — WIIID lOV 
;DATA SET lEADI IF lOV — VIRED lOV 
.INTERRUPT RIOVEST IF SET 

S,RCVF EaUIVAltNT TO ICVIF 

S.VRTE EOUIVAlIin' TO INITBE 



S.PARI 


EQU 


BITOO 


S.FBAHB 


EOU 


BITOI 


S.OVHN 


EOU 


IITSI 


S.ICVF 


EOU 


BITO) 


S_WETE 


EOU 


IITD4 


S.DCO 


EQU 


BIT83 


S_OSR 


(OU 


BlTDi 


S.IRQ 


EOU 


IITD7 



UART ittlm rigtstt liiti 
S.ElRliti EOU to? 



iftiilf. Fiiiiit. ttO Oitrria 



Fill. DRV OTACOM, TEXT 



Fmi 



CD 
ED 



UTE? 
T 



USD 







, UURT COKHAND RECUTER 






i 


NOT 










ooosoooo 




CKJ15P 


CQU 


OOOOOOiS 




CI1.0PBT 


EQU ilt 


iGOIOOlO 




CH.EPBT 


EQU <«0 


OOOOSOAO 




C»(.MPBD 


EQU iAt 



OOOOStEO 

geooooii 
ogootoo 
goooooc: 



ODOoOQog 

0(000104 
gOOOOOOl 

ooooootc 



00000002 
00000004 
00000001 

oooooett 

OOOOIOOS 



ooooooFa 



OODOOOIO 



ARIT! 

CHAR t PARITK 

T WORD NO FARITT 



00000010 

lootooio 

OOIOOOU 

•OOOOOiO 

ttOOOiOO 



S04 

!0S' 
50i 
507! 
SOI 

itr 

SIO 



S12 
SI3 
5H 
SIS 
Hi 
S17 
Sll 
Si9 
S20 
S21 
322 
Si3 
S24 
S2S 

S2i 
327 
S2t 
■52? 
330 
331 
332 
333 
334! 
S3S 
33( 
537 
331 

339 

340 

341 
343 
343 
344 
343 
S4« 
S47 



NOTE:e<iiiiot $( iitbiis of fill itctioi UqitlKi 



CNJPBD 



CIRD3D3 



EQU 



CH.ECHO EOU 

CK.DTRl EOU 

CH IRQO EQU 



CK.TDHI EQU 

CN.TEEO EOU 

CK.TOLO EOU 

CB TDBRH EQU 



TVRNOFF EOU 

INITENB EQU 

IHITDIS EOU 

CHDRC EQU 

CHDIVC EOU 



EOU 



(EO 



UO 

il 

12 





(4 

II 

tc 



.DISABLE FARlTy 

,00D FkBITT BOTH IHIT AND 8CV 

.EVEN PARITt BOTH IMIT AND RECEIVE 

,NARK FARITV BIT UPON IHIT -FARITV Ct DISABl 

; SPACE FARITS BIT ON IHIT - FARITt CK DISABl 



,IF SET-ECHO HODE FOR RECEIVES 

.ENABLE ICVR/IHITRR IF SET DTR BAR'lOU 

.DISABLE INTERRUPTS IF SET — NOTE CORVUS C 

. THIS IS ENABLED IRON STATUS BIT 3, NOT BI 

. AS IS INDICATED IK SVNCBTEK LITERATURE 

;IHIT DISABLED RTS BAR HI 
;INIT ENABLED RTS BAR LO 
;IKIT DISABLED RTS EAR 10 
,INIT DISABLED --IHIT BIEAI 



SOKE USEFUL NACRO COHHANDS 

FOR THE COniAND lECItTER 

CH.IIQO 

CN_TE10 

CH.TOLO 

CH.BTRL.CH.TBIO ,N0 IHIT INT, RCV IKT.ENAB DTR, NO FAIIT! 

Ck'dTILKH.TELO .sake as CHDRC KEPT INIT INTERRUPTS ENABLED 



(F) 



^ CLEAR BITS D3 ( D2 A NASI 



UART CONTROL REGISTER EQUATES 
; NOTE: Btod if lewi 4 tilf «I toiliol «gt<-it< BAUDCNV tibli iiiltti 

CR.STFB EOU liO 



CR.VRDll EOU 

CR_VRDL7 EOU 

CR.VRDLI EQU 

CR .VIDLS EQU 



I 

no 

Mi 

III 



At THEN • 1 STOP BIT 

. IF SET AS INDICATED < I STOP BITS IF NO P 



<1 STOr BIT IF I BIT 
•13 STOP IITS IE SBI 



,1 BITS WORD LENGTH 
■,1 ilT VDRO LENGTH 
} t ETC 
; 3 ETC. 



CiJITCH EQU 







iEXTIIHU SECCIVE CLOCK 
Ditin BiTt rvv rnn '•tnrr 



ril( DRV DTKON TEJT 



Pitt 7 



tOCOiOI.E 



sGCOsgn 

OOOOOSii 
(0000903 
00000003 

cocooaC'i 
otooaooo 

OOOOOOCB 

Docoaoot 



OOCOOCit 
00000004 

oocoGoo; 
oooccao: 
ooooooot 

OOODOOI'j 

eoocccsc 

OOOOOOiS 
COCOG05u 



00000093 
00009032 
00000031 
OOOOOOJt 



00000901 
OOOOOOii 
OOSOOOOC 

ooooooro 



, tIAAT c6llTI0L RCGISTO C0N5T1NTS FOD HART SETUF 

CTLRC EQU CR BOUKtCR VROU ,1 STOP giT.SBIT VORD ICNCTH.EAUD RATE GENE 



ASCII Conttal chicictfis tot pttntcT cfrfi.troi 



ION 


cou 


Ul 


lorr 


EQU 


tl3 


ETI 


EdU 


i03 


ENO 


EOU. 


»05 


ACK 


lav 


tOi 


NULL 


EGl 


iOO 


CR 


EOU 


iOO 


tr 


EGU 


SOA 



.CAN SKIT ICTL-Q) 
,STOP SHIT (CTl-SI 
.READ* FOR HORE! ICTI-CI 
.READK FOR KORE' <CTL-E) 
,JES, i'H READ* (CTl-n 
.Nli'lL CHARACTER-DO NOTHING 
.CARRIAGE RETURN 
,LINE FEED 



KiiiBOR fi[«aetc[ viiuts Ut Unilstdtut Set tiblc entry tunctions 



JOn SET BAUD RATE 

.FOR SET FARITV 

,rOR SET WORD SIZE 

,rOR SET DATACON 

,rOR SET HANDSHAKE TVPE 
,HI WATER WRITE HAI I CHARS 
,L0 WATER WRITE HAX i CHARS 
.HIWATER READ ICHARS NAl 
,10 WATER READ ICHARS HAI 



.invalid dd-tinfilid I/O leqaest) 

.invalid table id 

.invalid paraieter 

.invalid tunction cede 



, Pascal true boolean valne 
.IISTINC CONTROL - START LISTING 
.LISTING CONTROL - STOP LISTING 
.HASK OFF WATER HARKS -THRO THEN AWAT 



HAZIAIf'O 


EOU 


( 


HAIPRTV 


EQU 


4 


KAIVRDS 


EGU 


1 


HAIDTCN 


EUU 


1 


KtlKNGS 


EGU 


J 


HAIWHl 


EOU 


■ 133 


HAIWLO 


EOU 


90 


HAIRH! 


EOU 


133 


HAIRLO 


EOU 


80 



eiroi codes ilORESULTi 



INVCKD 


EGU 


lOEioteq 


INVT311D 


EOU 


lOEtblid 


INVFRN 


EOU 


lOEuiopi 


INVFNC 


EQU 


lOEinccd 



Klscellistoas deUditions 



TRUE 


EOU 


1 


ON 


tou 


I 


OFF 


COU 





HILOHSK 


EQU 


iFO 



fill DUV DTKOn niT 



P<4t I 



tniiT 1/0 ruMCTti rustKC oeriNiTioN 



CfflOMNO 


UKIT 


iDDI 


eowi 


t • mmu 


DO V 






1 - DCU 


Dt.V 


01 I 


01. V 


: • mm 


Dt V 


Dt.l 


01. W 


3 - CLtU 


Dt V 






i ■ lUit 


Ot V 






S - STtTVS 


Dt.V 


DLL 


DI.V 


t - vmouNT 


01. W 







nocx RODc 



DI.V <--FUNaiON CODE 



lOIESUlT 
D7.V 
D7.V 
D7 V 

srv 

07 V 
D7.V 
D7.V 



lUST 



DI.V 



Ul ICCItTII VmitCt ON IKTIt Ml SiVtO MO ReSTCRED EICEFT D9 i D7 
IKTERNU lEClSTEl VSEIkCE . 



Dt 


ttip itj 




01 


lt»f iij 






otci't teniit 






chiKctti (c 01 ti6i balfit 






tmit Biitii 






Holi ll(( ( in DC ctl int lUi - VIk lint bi 


1 




ftit ot St 






tfip tot 






«••» tO| 






FtriMtti tltck tdditff (Uiei's diUI 






bulfic lidiiii u SctipVI tnd SttapRt 






UMT ti<( iddrtit 






> Poistti t« (oit't dill ltd 





filt DAvmcONTtlT 



tl%t 9 



oeot 

1000 

ooo: 

1003 

0001 
0001 

ooot 

0011 
OOlt 



tft20 

002: 

«03i 
0020 
OOIC 
002C 
1030 
003] 
003« 
O03t 
0C3C 

0041 
9042 
OtO 
0041 

004C 

lost 
tos< 



Olt 

i 



01 «E 00 

S44t<34r4D4D 
72it7<iJ72]0 
30332(302! 

001? 



ooot 
7ert 



OfFA* 
OEIO» 

0C4Ct 



0012« 

0190 
0000 

7r7t 



losli ooot 

ooso out 

OOSt 02iO 

oosc osrE 

OOSC 0<iC 

OOii OiBO 

I0i2 0«7C 



ClOiAl 



omcoH siivti 



COflDRV 



CONDRV 



litOlO 

hllil 

COHOOl 



coRitro 



rilMDUl 



lU.S 

omjf 

DATA. 8 
DATA. I 
BATA.B 
DATA.B 



EOU 

HOVEQ 

CHFI.U 

BKI.S 

novtn.i 

CIR.L 
flOVtA . I 
CIR.L 
tCA 
CHP.V 

ita.s 

LEA 
CIC 

l(« 

LSl.W 
HOVE.W 
JSR 

HOVER. I 
RTt 



COHOOl 



31 

13,01,14,00 

hilta 

'DATACORH mUlt (> SO)' ^HEADER H3G 



,JUHF AROUND HEADER 

, DEVICE NOT BLOCKED 

^VALID CHD3 - ALL VALID 

.DATE 

.HEADER HSCLENCTH 



t-luOlO 

IIKVCHD,D7 

IUW|CHD,g4 

FRNDCRR 

Dl-D(fAO-At,-(SF) 

D7 

Dl , A3 

Di 

FORTODiU, Ai 

UnilFO, DO 

CONIsFO 

FORTlDiti, Ai 

DO, D4 

COHTBl,AI 

01, DO 

0(A1,DO.V),DO 

0(A1,DO.W) 

(SF)«,Di-Dt/AO-Ai 



THE FRIKTEI DRIVER JUNF TABIC 



CORTIl 



issuie iDTiIid couind 
VALID COKHAND! 
NO 

SAVE REGISTERS 
CLEAR lORESULT 
ADDRESS OF USERS BUFFER 
Clt>[ silt ol SR itgistti 
asiuit ttlking to Port 
IS it Fort 0? 

J" 

,NOi tilting to poit 1 

iSift unit Boibei 

;TURN THE COHHAND INTO A 

, INDCI TO THE FUNCTION 

,D0 FUNCTION 
iRestoii [igiiltis 



SATA.V 


COniNST-COItTBl 


,UNITiNSTAlL 


DATli.V 


COARD-COHTBL 


,UNITREAD 


DATA.V 


COKVt-COKTBl 


.UNITWRITE 


DATA.V 


COHCLR-COHTIL 


,UNITCLEAR 


DATA.V 


COHBSr-COKTBL 


,UN1TBUSY 


DATA.W 


COHST-COHTBl 


,UNITSTATU5 


DATA.V 


COHUHRT-COHTBl 


,UH1T«NH0UNT 



Fill. DIV.DTUOn.TEIT 



Ptgi 10 



ctit (i:t 



ten uct Mtt 

mc 4ut iiii 

l«7l 7t04 

It?: joDr 

1174 sici rrrc 



i«7i nrc toil 1113 

Il7t 0F«7 
IIII iU2 



tot: 4101 ooci 

•Hi ilOl lite 

toil (ItO nil 



tilt (III lift 



1071 till 
lift 4E75 



COHINST - VNITIHtTKl ••> SETUP THE DEFAULT lUFFEB COKFIlOl FE1TVIC3 
Afinit tkit t tM>nogi DitiCoi Ctaliol iitiitipt ii binign ill will 
it tiilUI If (l*< DlliCoi Ctntroi inlcrrapt sittict lostint cotticllf. 

fill nil llOlktl til t«{4lt C9U0B ll<4 



COHIHST 



»R S 
ESX.S 



SiitUait 
D.ISINTS 



, tail billci eaaltel ttblt 



LEX 


IFMTKXi), XO 


LEX 


DEFIWIT(Xi), XI 


HOVEQ 


(DEFBCTlN-1, Dl 



ClNbiletl HOVE.V (XUt, (X0)» 
DIF DO, CINboictl 



.DISABLE DATXCDK INTEIIRUPTS 



ibtginoiag ol t>bli 
.btginaiag ol diUalt libit 
iDoibei oi woidi ID libit 

,10Tt Icoi diiiill lo till 
.libit ii tftn naibii ol woiiif 



lailliliit UXIT liti eoaitints iRd Piialii Caaltol Tibli 4 inilitliit VIX 

' HOVE. I tlDDDIA.DDRX.l ; INITIXLIZE DATA DIIECTION lEC FOR PORT A 
ISR.S SETUART 
IliliiliK READ. VRITE AND CONTROL BUFFER COITrROl TABLES 



,iail wiitt buffer 
,iitit [ltd ballet 
,init coattol baffit 







l!R 


INIVRBF 






ISR 


INIRDBF 






iSR 


INITCTLB 


. St 


tap 


inletiept 


ttclois 






ISR 


SETVECS 


, II 


111 


id SI Ikca 


tiiUfc it 






isR S 


ENBIHTS 






ITS 





File DRV DTtCOK.TtIT 



Ftgt 11 



an UK 0400 

oon Bi7k mc* 

00«C 6704 

OOkt 323C 0200 

OOil 40C0 

00A« 0240 0700 

OOU B04I 

OOK <40C 



OOAE 40Ci 

OOBO 40C0 

OOBl 0240 AOOO 

OOBi 0041 

OOBl 4iC0 

OOBi 4C7S 



OOBC 4A4i 

OOBE i704 

lOCI 4iCi 

00C2 42li 

0OC4 4E7; 



OlSIHTS - disibli intiicofts f«r Fort ttliclid. If Fcit tkii ditiblt op t* 
Itoi 4. If Foil 1 sfititti tbin ditibli op to liril 2 

CnUf : Di ' siiid SH if got lire 

D4 > oDit Duabti 
Eli I : Di • fived SR 0[ itro 



oisims 



DITisPO 



KOVE.W 


IIKT4, DI 


CMF.V 


UnitFO, D4 


BEQ.S 


DITisFO 


NOVEV 


IINT3, DI 


NOVE.V 


SR.DO 


ANDI.W 


IINTHSI.DO 


CHP.W 


DI, DO 


BCC.S 


DITeiit 



;iliou Port 0, Itril 4 itit 
,is it Fort 0* 

;iio, uit Pott I liiil 2 iat 
.qit corient flilos (tfiltft 
,CET ONU IKTERIUFT lEVElS 
;ii cstrtot < coitml Fott'i Ufil 
;iio, till 



HOV sit ip dtsitit with liniBua diflorbinci of opptr Ititl 
itiitt bits -•- this too wont Moik if osoi ind 
sopittisoi sptci lit botb otiliitd. 



DlTtllT 



KOVE.W 


SR, 04 


HOVE.W 


SR, DO 


ANDI.V 


tUFRHSK.OO 


OR.V 


DI, DO 


HOVE.W 


DO.SR 


RTS 





.too eocitnt SR 

,g(t count ftttii rogistei for ehitgt 

I KEEP ONII UFFCR BITS 

,di«ibli ooitoat Port's ioiol 

itorn off tbi ills it tho SR 



ENBIfaS - Rtstori iiftd SR tf sittd it 
Enttf : 04 • iiied SR if not iiii 

Eiit : Di > if Di wis not itro Ibm SR <- Di ind Di <- « 
olheiMisi SR rouits ontooebid ind Di sli|s t 



ENBINTS 



EITEIIT 



T6T.W 


Di 


BEQ.S 


EITEUT 


KOVE.W 


Oi.SR 


ClR.l 


Di 


RTS 





Dots Di kifi « stitd SI 
DIDN'T SAVE SO EIIT 
rsstott SR 
ilwrs Iiiti Di I ti itro 



Tilt: DRV.DTKOB.TEIT 



P4|l 12 



OOCi 43FA llllt 

QOCt IDFl iHU 

COCE 41FA nu» 

DODl eiSO 09011 

OODi i70t 

OODI 43FA OElOt 

OODC 1DFA OBtCt 

OOEO 3284 

00E2 4E7S 





; 














..SiiiUnit 


- dtleittii if this II Foit 


f 


Foit 


I ind livi unit nvtit 




J 


ilig Kitiiliii tt It ><d 


IKS 


«1 poit'f diti iiti 




, 














; Est 


jy D4 . 


Hit nuibtr 










Eli 


1 : Ai < 


tddttss ot port '1 


did 


nil 






, 














SiTiUnit 


LEA 


UnitPO. AI 






iliuiic I) Foit 






UA 


FoitODill, Ai 


























LEA 


CKNFLCS, AO 






it poitf Iq f Itg VIS 






BCHG 


IPORTFIC, (At) 






lilO tblD IS poit Q 






EOFF.S 


SVUisFO 






list it is now port l 




















LEA 


UnitFl, Al 






Foct 1 iddicssis 






LEA 


FoittOlti, At 
























SVUicFO 


HOVE.V 


hi, ai\ 






Site unit nu|ib([ 






BTS 











File DRV. DTACOH. TEXT 



Fl()< 13 



gOE4 (UA 



OGCi 7010 

ooei 122c oocd 

ooe: eeo> 

DDCE 1001 

ooro eo:c ooob 

OOn 1B40 0007 



lOri 7GGS 

OOFA 122E 009C 

OOFE EBOr 

OtOO 1001 

0102 1S40 0003 



tlOt 102D 0001 
OlOA 102D 0003 
GICE 4E73 



; SETUART - loitiiliie HART Eioi constintg ind Buffer Control Tible 
, Get UART Register Siee tddrest 

SETtiART BSR.S CETBASE .RETlfRNS BASE IN AO 

, Setup HART'S Control register - indei • 7 froa Stse 



HOVEQ ICTERCCO 

KOVE.B Br_WRDS(Ai), Dl 

LSI, B IS, 01 

OR.e 01, DO 

ORB BF_ROBO<A«), DO 

HOVE.B DO,CrLIECUASl 



,1 STOF BIT, BAUD RATE GEN 
.ADD WORD SIZE-? OR I BITS 
,HOVE INTO HI ORDER BITS 
,00=8 BITS, 01=7 BITS 
,AOD BAUD RATE FROK TABLE 
.PUT IN CONTROL REGISTER 



Setup HART'S Couind register - indei ' S froi Bise 
Bike trinsiit buffer eapl; mterrnpt enabled - when occors int rtn will 
turn off if buffers ire eiplf 



,Cm CONSTANTS »it int enibled 

;GET TABLE PARIT? 

,PUT IN CORRECT BIT POSITION 



,F11T IN COHNAND REGISTER 
Reid tbe Oati Fort and Status Register to cleat all Status flags 



HOVEQ 


ICHDRVC, DO 


HOVE . B 


BFJARTiAil, Dl 


LSL.B 


IS,D1 


OR.B 


Dl,00 


HOVE . S 


DCCKDREGKAS) 



HOVE . B 


datarecia:),oo 


,DATA PORT AT INDEI = 1 


HOVE . B 


STATRIIA3),D0 


.STATUS REG AT INDEX = 3 


RTS 







Filt OIV.DTtCOn.TEIT 



pm> <* 



UTINI 



111! iBrt ooti tr2« 

oil. >i!t IDCO. 

til* i7C4 

OIU DAFC t«)t 

0119 <C7S 



01:2 


\\rk 


04IC 


out 


1171 


0014 


gilt 


:ict 


0044 


ei2[ 


(3CI 




tllO 


«70t 




013! 


4ir» 


liU 


0131 


1007 




0131 


nn 


ODtC 


one 


ttot 




USE 


41t» 


oi'.c 


Oiti 


ilCI 


0070 


01 *t 


lODA 




0141 


4ir» 


tiiO 


014C 


IICI 


0041 


tISI 


U75 





777 
771 
177 

lot 

101 
10! 
10) 

134 
lOS 
104 
to 7 

tot 

107 

no 
111 

til 

113 
IH 

lis 

lU 

t;; 
lu 

117 

til) 

11! 

1:2 

123 
tl4 

lis 

lie 

12' 

lit' 
1171 
130 
1)1 

132 
133 
134 



CCTIASC 



CCTBASE 



CtSitFO 



Cit iddciis tt If'ART's [sgiftit tm tddiass in seaacf 
Ebmy D4 » unit BQibii 



HIT 



lAil ' 111! Iddllit 



ICA UARTDCl.l, AS 

Cnr V UnilFt, D4 

lEQ S CESllPO 

tDDA V lociorr. as 

JT5 



.Hiiini \li[K GATACOK 

,iS H Fon C 

■<«« 

.hi. BASE < OFFSlT<i;aIIT DCO iASE ADDI 



SCTVECS - Pst tn(|[[ttpl (uutiflt's enttf tddicsses into Iba intercupt vactdis 
ll Foil put ift Dl in( tto iodlttt in Vecioi 4 
othtiwiii tssuic If pdti 1 

Sivifi old l4«tl 1 miinupi vcciot ti n is not > to this dtiiei t 
intiKBpt loutines iddridi . 

Entty i;4 ■ unit noabir 

intatitipts diiiblad 10 iofai tot cutitnt Pon 



SETVECS 



SVCkic 



LEA 


GCTLlKT.tO 


nOVEA l 


VECl V, tl 


HOVE I 


AO.VECl V 


:npa l 


AD, Al 


lEO S 


3VCSOB 


LEA 


Sixliii, AO 


ntvE i. 


Al. (AOl 


CBP-W 


LInilFt, 34 


SKE S 


S«dl>Fi 


LEA 


:;<:31IIT,A0 


NOV EL 


A0,VEC4 W 


IDA $ 


iifClilt 


LEA 


CCllliT.AO 


nOVE.L 


AO.VEC! V 


UTS 





,fUT DATA COM CONTRGL 
,Cbi Old f»cto[ 
.INT ROUTINE IN VEC 1 
.should site old vecttt 
.m. (hei [( tht! sue 



.19 It Pott 0' 

.r.;,, do ifliel I tot Foil 



AiaR OF DCS enUf poini to KriTiRCV IKT RG 
,pi)t It iti VEC ^ 

,ADDR Cr DCi entff point to XMiT-RCV :KT Ru 
^put It in VEC I 



lis; 

01 Si 



mi 
4:19 
nu 

CtS! 
UEE 

;cc» 



f.ik iiii 
01 sC UFC 

::!! 3:rc 



tl71 

t;7» 

01 7C 

am 
iiii 

Ml! 

sis: 

OliO 

01)1 

eifc 
ouc 

llAi 



4:j; 
4:11 

EEOi 
illE 
SOCi 

ioc; 

JOFC 

3orc 
iin 

42Si 

;oFc 

iOfC 

4:51 
4i;;5 



KON TEir 






tii 




137 




e3i 




«3! 


sou 


840 




t4l 




Mi 


;o«4 


S43 


CDOl 


144 


]is: 


84S 




I4i 




!47 




£48 


3133 


84! 


oi;3 


650 
iSl 




853 
854 




155 


co;o 


S'.g 




857 




I5S 


SCO, 


85 i 


CSiC 


110 



iOO 
100 



0015 

ooso 



0U4 


41EE 


09S( 


OUl 


43Ei 


004E 


OUC 


::c8 




OUE 


:iC8 




ClEO 


4251 




OlBi 


0SE9 


ttoi 


OIBI 


4E75 





113 
814 

lis 

Itl 
667 
818 
11" 
870' 
171 
872 
173 
174 
875' 
171 
877 
878 
87? 



IE* 


«BTCTliAti,AO 


CLR U 


UOl. 


CLfi S 


<A0). 


aSET 


IAUli'_y2,U0l 


SSET 


IEMFT.i2,(AOI 


IE* 


WRTBUFlAtl, A 


HOVE L 


*i,UO.« 


«0V£ L 


Al,(A0l. 


KOVE I 


A:,tA3i< 


KOVi, U 


tV8FLe)i,(A0>. 


KOVE V 


IW'tFLEN.iAOu 


RTS 





Pigi IS 



INIVSSF - Uiliiliie Vlitt io(i<( xillMct to CHPTV Ellffal ilia CNQ, BUSV ltd 
SENDLF itl cie4ied to tiUe. Lite dettuit buMll 



.VRITE tUFFER I^CKTSO; TARIE 

.RESET All FIAC I 

, RESET ALL FlAG i tic<|>l 

, DO AUTO UNE FEED iliil *kb nS/l3< 

; Bl/FfER IS iHfTY 

.VRiTE BUFFER 

.FILL POINTER (liSEO TO Fill CHARACTERS iKI 

.lKPTV POINTER lUSEO TO EHPTV CHARACTERS Oil 

,S<ve butiii iijdiifs 

,HAEmUH SIZE OF BUFFER 

.NUHtES OF lOCATlQNS AVAIIABIE TO Fill 



iiiUDBF - iaitiiilK UkO iuiitt iitiibUs to ENFTV Bufltt liso ENQ, BUSY ind 
ilHIii! ill cleittd 111 liUt. (lit dtdult bufiti 



.READ BliFiER CONTkOl TABIE 

.RESET All ritC 1 

.RESET All FIAC 2 (lct|ll, 

, BUFFEA IS EHPTV 

.READ BUFFER 

,FIll POINTER (USED TO Fill CHARACTERS INI 

, EHPTV FCINTER lUSEO TO EHPTV CHARACTERS OV 

iSiTi bufiir <d4tcfs 

.KAIIHUH SIZE OF BUFFER 

.NUMBER Of lOCATIONS AVAIIABIE TO Fill 

.CUit tltetnttft btifiei tddttss 

.Cliii ilttiniK biitfit lentth 

.NimBER OF CHARACTERS FOR NIGH WATER NARK 

.NUMBER OF CHARACTERS FOR IDW WATER HARK 

.CIEAR ENO COUNT 



INITCTIB - InltMliie Ihi ctntroi cUdclif buflii to iiply 



lEA 


RECTI. All, AO 


CIS W 


iAO). 


CIR S 


iAOIf 


B3ET 


tlHPT.Ul.tACl 


LEA 


RCBUFIAK.AI 


NGVE L 


Ai.tAOM 


KOVE L 


A1,(A0). 


MOVE. I 


Al.iAOu 


MOVE.W 


IRBFLEN,(ASI« 


MOVE.W 


ISBFlEN.tAOM 


Clfl.l 


(AOI« 


CiR.V 


iACl. 


hOVE W 


•HAlRHI.IAOIt 


MOVE.V 


IMAiSlO.IAOK 


cm w 


(AO). 


RTS 





INITCTIE 



lEA 


CTlBUrtAll. AO 


lEA 


CB_rSOKT(All. Al 


HCVE.l 


AO, (AIl« 


NOVEL 


AS, (All* 


CLR.W 


(ill . 


BSCT 


•tHPT.CB, UAll 


RTS 





.CONTROL CHARACTER BUFFER 
,CTl CHAR BUF TABLE ADDRESS 
;i«t ([Oil ind 

.(til Rtinttts to bitm of biiflei 
.eUt( 111 JUti iiet(t 
.builii (iptv 



fill. DHV DTKOM.TEZT 



P>4t 11 



FER 



OIBC i73t 



giBC mt 0094 OGli 

Diet 1704 

OlCi 7E3D 

OKI lOiA 



net OStE 0001 0031 

OIDS (704 

OlD! 7E43 

01O4 tOlE 



tlDl 002E OtOl 0033 

OlDC i70C 

OlDt 0«2E OOOS 0031 

Oie« i7DI 

OlEi TE3C 

Old loot 



OlEt ilOt 
OlEC iSOi 



OlEC UC3 

OlFO S341 

OtFi iOCi 

tlF4 4E73 



CCHHO - UNITREtO REtD mOK THE OtTtCOH BUifEE 

INPUTS. .Di COUNT or CKtRtCTERS THE USER VtNTS TO SEtS 

D4 unit nuKbti 

t3 tDDSESS Cr I'SER'S iUlFER 

ti tddtiSB fti pons fliu ma 

NOTES For ceiding, inUitupts wiii eccvt wtisn tht input butler is lull -nc 

pFiiing ii ntctssiiT a ii Miih wilting Alio if full dupiii tfttnities 
then I ttii ind wnu intairupt »y bt the sue intertupt -iurt to checii 
itilui iltos of UtRT 
Fust see if iisec'i count is eshiusted li not iitespt i ttii 



COHRD TST.W 
BEQ.S 



CCKRoI 



.COHREI CiliElitl E[:T ROUTINE 

, Cbeck il Ibi afii bt) liisibUd oulpst - Suliet to Utei 

lEREAD ETST lOUTE Jl .BB.FLCltl. til , IS BUiTER TO USER TRANSFER EKtElEO' 

BEO.S CAKdElt I lEo, check toi input eiioi on O'tRT 

KOVEO IIOEoidtbl,C7 .no, teil usei cin I •) ERROR 

BIt.S C0H8EI 



, Cbeck lot i UtRT itioi 

CKIdElc ICIR lEftJl, RBJlGUKAol .Hilt l teio eiioi 

ECFF.S CKFORT ,no, see ii hiii iHt 

nOVEG lICEuiitti.Oi ,T<s, tell user tnO iiit 

ERA.S COHREI 

, ii llifie IS lit ilili in (he bilftii one it to usei. II tbeie is no tfali tni 
the os([ hii disibitd the Inbound leid, leiinl hia. Honeitt il Ibeie Is no dm 
put hii in 1 loop willing for diti 



CI FORT 



BTST 

BGFF.S 

BTST 

lOFF.S 

HOVEO 

BRA.S 



lEHFTJl.RB.FECUHAll .BUFFER IS £«PTV' 
READONE , HO, GO BEAD t CHARtCTER 

llNPE.Rl.RI.FLGl.llAil , Tes, INFUT EHABLEu' 



REREAD 

tlOCildtbl.D? 

COKREI 



, gil usei his cbiftclacs isd iinige boffii 

REtSOKE E!R S UCETCHR 

BCS.S COHREI 

; Fit chtiiclei in osii's bgflat end updile 

KOVC.I D3,lt3i» 
SUBG.W II, Oi 
IBA.E conflo 



, KES, wtii lot 1 cbii 

,no, tell usee input is disebltd 



,CET THE CHtRACTER FOR THE USER FROK THE BUF 
,eiit 11 ercei, 07 has etrot code 



<spdite buflit pointtt 
iSubliici one Itoa sssi count 
,CETSH0t IF tVtlltBlE 



COKIEI 



>T3 



:i,'. CUV 3tj:ok teit 



Fi«e n 



oiFi tios rcu 

UFA :0i: 003! 

an uii 

CiOS iCH iC3l 



gii4 2:iE C33C 

3!0I 3m W! 

sue 81Cf 

020E t30( 

Oiii iCtE one 003) 

02U 'ittl 004! 



Ciu 32:e tm 

02<.E E2iE 0040 

Oi!! iSOA 

0124 i:i2 

022t 03CE 0001 0033 

o:2C use 



t2!C 6114 

1230 tlOC FEOk 

0:34 42)0 

0231 4E7S 

0231 ilOO lEU 

C23C 7E40 

t23e 44FC 0001 

0241 4E7S 



UCETCKR --- Usei itvtl gtt ebiitctti loatint, 4«ts tkt cbitictn fiti the iiid bglftc 

Entif H e pointer to pofta diti nn 

D2 > flser count 

k)4 ' unit nuibot 

buiiec lb NOT c^pti 

Eiit . 33 • chiiictd If one gotten 

iCi > Etior, i)7 hei ettoi code 

(NO * got i chir^ctff no etrot 



B3R 
HOl'E.E 

novc e 

KGVt I 



DiSlKTS 

RB.EMfTVlAJI, AC 

(A0U,D3 

AC, RE_EKPT(IA4I 



idisiole intempts 

,A0 '/ ENFTVINC FOilTION OF ID BUfFCIl 

•Get chiis 

iSive the new Front pointer in rb_eiptT 



Updete butter tei ubles 



HOVE.L 


IISJADRIAil, 


Al 


ADDA.V 


RS.SIZEikii 


Al 


CKPA.L 


Al, AO 




BIS.S 


UuCnoui; 





MOVE.. 

UCCnowrp ADDJ V II, RE.rSEE(Ai) 

. see It buitet 19 eaptf 

HOVE.V RB.FREEtAtI, Dl 

CHF.V RB.SIZtlAtI,' Dl 

BCE.S UCCnotil 

BHI.S HtlFRD 



;Al < ADDRESS OF EI/EFER BEGIN 
,A1 > ADDRESS OF EHD CF BUFFER 
,1s Front pointing oeyond butter? 
,tto, tion't do wttp eround 
,1i>, set front > iddr tst bfte of buffer 
BADItAtl, R8_ENPTV(Ail ,Si>t the n(H Front poinlei 11 ib..eipt) 



.SINCE VE COT CHAR, ONE MORE FREE SPACE 



, I or FREE LOCATIONS - BUFFER SIZE 
; not iiptf if free \ sue 

, KEIPHD IS SERIOUS ERROR (free I iiiel 



BSET 
B3II.S 



• EHFT.Ri, RBJLCitKAil , BUFFER etply 

RChkAllBf ; set it should sieitth to in Alttinite beffe 



, Do piotoeol fiontiol, see li cen turn off Rtid Busf 
'JGCnotit 



HEIFSD 



BSR.S 


CbkProto 


, chick protocol 


BSD 


ENBINTS 


iesible interrupts 


CLR.L 


DO 


i cistt ceiri 


RT! 






ESR 


ENBINTS 


, SERIOliS lUmCR BUG 


MOVEJl 


• lOEbsieit.D? 


.SIZING ERROR 


KOWE.V 


il.CCR 


^SCT CAIH! 


RTS 







ril« DRV DTACOM.TEII 



?igi li 































































iim 










nu 


082E 


OOOi 


0031 




t:u 


use 








0Z4C 


oezc 


OOSO 


0012 




0!5i 


1734 








1!54 


0S2E 


0000 


0013 




o:sk 


lt2C 








OISC 


OliE 


0000 


0031 




3U! 


t714 








gu4 


321E 


0040 






nn 


!2iE 


004! 






t2iC 


B2iE 


C04C 






0170 


Hit 








027! 


OStE 


ooot 


0031 




Oi7S 


7011 








02;* 


0I2E 


0011 


0013 




OiSO 


tiOi 








02«: 


709i 








0it4 


iiOO 


lOIC 






0201 


4E7i 









, ChkPC'ito - ehecki low wttti iirk In {ciding to set if should turn oil mi tus^ 
GoUnbasf - cntif ^oiBt to tvin oft Bui|i itite or lecaifes 

KGTES. Tki) routuo isiuBuO thit intflitopls tee <liSiblod prior 
10 Its bung iTiioked 
ChtFroto 

, check if input disiblid Cinnot turn off busy if is distjled. 



BT5T 
BON.S 



lihPtJi, K8Jl.Sl»li*ti 

CPRtiit .inpul dlSibUo ellt 



, if (protocols enabled) and (HOT Lini trpo/ then chfltii ii busr 

BTST «PROT_f!, BFJROfHil .putocoi enabled' 

BGFF i CFRlllt .no, till 

BTST UINE, EF.FROrtlUll ,Line lipe 

BOH. 3 CFRllil .)ti, em 

, if but) then ohtct if buffet it or below low wiitr iiii 

BTST KBUSI.Bl, RBJLGUiai/ 

30FF.S CPReeit .not suit eiit 

, If buffer it or bcUw low vitei airk thtt lurn oft busr 



KOVE.V tBJiZEilil. Dl 
3UB.V BB.FREiUii, lit 

cnF.v i;s_ioM(A«i, m 

3H1.S CPRelil 
It It or below whin busf so turn off bas| 



.BUFFER SiiC UDD8ESS Ci'l 
.Dl 3 nulber ol chlre in bulfel 
, ii. or below low water Kelt' 
, No. tut 



Coiitbuit SCIR iBUSI.Rl, RBJlSltliAii ,cltir but) Itale 

HOVEO ISOK, DO .astuie ICN/IOFF protocol 

ETST tlONIOrr, SF.PROFtlikii .iiid b)ti to mhet siOi tiling not Susf 

B0K.3 CPRitiii .send XOk 

XOVEO lACK, DC .tiihii ETI/tCK or EKOaCK to send tCi< 

CPIion B9R PolCIl .send the coniioi chit 

CPReilt RTS 



fue :RV DT«COh TEIT 



Pige li 



C::» icU vOJl CC3J 



."lA 



t;'» 


:»i: t0(4 


3i>t 


3S;E SOi! 


iu: 


!ic: !J',s 



o;a: 


4i:e 


:C:I 


;-:»» 


csi: 


3o:v' 




iiJC 


Ot!i 



I32t 

102! 

103 

113: 

IC3: 

1033 

U!« 

1031 

IS3i 

i03' 

1039 

1C3» 

1041 

1041 

1041 

1043 

.044 

154; 

104i 

104' 

i:4i 

-.04) 

1353 

lO'.: 

lOW 

.JSi 

IC'i4 



RChkAliEf - check li attitinitc t\ittti switch en icid bullti 

Rci input II iutoBitictilT disiblcd when user ciils unitjtitus 
Iwitcb bullets. 

Enttv Ae t addisss of pott's ditit aiei 
(nienupis disibieO 

KllUliet BTST lEHFTJi, RE.ri.(li>ll At I ,1! nuftei empt)> 

SOFF 5 iCASiiii ,n<i, cm I switch 

BCut iAlTSFJI, RB.rLGUKAtl ,ls analteiniie bufiir i<iiliblt< 

BCFF 9 iCABtiii .no. nothing to switch 

, Switch buifers by liking the Altctntte boilei the nun battel 



nCVE.l SB.AEAIRiAti, AO 
NGVE.V RB.ASUCtAti, DO 
BSft aetupKB 



,get new but let addtess 

.ind ieiiglh 

.switch butfet in tibie 



. it user is !4CT ccntioiliiig the input disable bit then enible RCV input 



.EnbHcvIn needs AG -i flag bfte 
.IS uset conltoUing input disable' 
.use! IS CDntcoUing, eiit 
.enable tecevie input 



iCAEekit R7S 



LEA 


SBJiCu; 


:Aii. AO 


BTST 


tlliPCJi, 


iA3i 


50K i 


tOABetit 




ESR 


CnbRoln 





•lit CRV DTACCM TEIT 



ri«i 10 



:3t ^Kil 



:;« ii.i 






Hi 



i;:i see 

JiSf t'OC 

SiEC iTDI 

!:t; -car 

:U4 t;ii 



iZCl 'ti'A 

O'lEi tItE 

I:EE i6H 

S1F4 uO< 

OZrt tOBE 

oiri 

tin 4e;s 



:ac! iiiLS 



joto ggw 



icc< eoi'j 



list' 
'.057 
iCil 
Hb» 
!C6a: 
iDtl 
:Oii 
IDiJ 
:0i« 

li6S 
ICtt 

i06; 

'. Stl 

.cti 
i;70 
IS!; 
IS?; 
;ou 

•.074' 

.s-s 

Hit 

u;! 
lon 
i:7» 
loie 
ill: 

lot) 

!£!< 
I3IS 
lOBl 
iOt? 

iota 

lit! 
1090 
10*1 
>0!I 
10(1 
1J?4 

lots 

IO«l 
1017 
lOtI 

ion 

UOO 
1101 
llOi 

1103 
1104 
IKS 



COIHR - VhlTVaiTI 

IKriJTS .0! COUKT CF ChAIACTCRS THE USER VAKTS TO VR[TE 

D4 uflit ftuibcr 

A3 ADSRESi OF USER'S ilHARACTERS 

At td4ieti o( ptiii Oili nil 

KCTE Foi viitir.4, th« tIART til tg bi riiaiil u initi[UM>>4 whin )■>< "il biflii 

11 fiptf b| iniblint tbi iiit intiiiipt II do iiiiiions Ibin ol cggise H( ciplf 
ind it inttrrspti iottfei Htnce uickcrf onlT vhin sending iirst oE i ittcti 
titiriing inictiuplsi icd laii ot i strtaa estopping the little diaisi 



0KV5 



T5T V 
SEd S 



convEi 



,1S USER COUNT DOHE' 
.YES 



, It inppt te bullei diiibled input 

REWRITE RTST llNrE.VI, VBJlOltltAil , iS USER TO BUFFER TRANSFER ENABLED' I IHBOUND 
ECFt.S CKbuUri .TES, chk lE bullet sue eit found in lait i 



r.OVEG 
IRA S 



■iOEiadsbi.C? 
VRFROB 



, Input distbled gife eitot 
,elii 



. :heck wtiie o.-toi ( Uq tot etioi dating iBii inteirupt 



CKbDfeif SCLR 
lOFF S 
ROVEG 
BRA.S 



lERR.Vl, «!JtCi»liAt. 
CK«RT? 

llOE«sieir,li7 
VRFROB 



,E(tot> 

.No, cfal li bullet IS lull 

,3I!1NC ERROH mtb viite bullet 

,eiil 



, Cliecl :l lulfet is fill il is end output is NOT disibied then spin wheels 

CRVRTP ITST efUll.Vi, VE.FlCiiKAS I .lallei lull' 

lEO S WRTOHE .NO, CO WRITE A CHAR TO THE BUFFER 

BTST iCUTE.Vl, VE.FlCUKAil , Ves, OUTFUT IS AT ALL ENAIIED? 

BOFF S REWRITE . «ES, spin nheils nhiie bullet eipirs 

KOVEQ iIOEowdsbl.07 .ein'l send tell usct ERROR 

BRA S VRFROB ,eiit 

. Biflei net full so put uset cbetiotets ot IF into Hiite,bsllcr 

VRTCNE 



WRTinLF 



CONVEI 
VRFRCB 



HOVEO 
BCLR 
BON S 
HOVE 8 
SUIQ W 
BSR S 

BRA 3 

RT5 



ILF, CJ .issuie insl sent in CR so last send < LF 

ISNDLF.Wl, WE_FLC]<IIAtl .should send in Line Feed cbet' 

WRTinLF .fes 

iA31t,D3 .no, then get 1 user ehii 

11.02 .sublKct I lioi usei's count 

UrUTCHR .PUT THE USER'S CHARACTER INTO THE WRITE BUF 

COKWR 



nu: DRV.DnCON.TEIT 



Pigt 21 



t:rt 6190 FDtA 

C2FE na otii 

030! IOCS 

0394 1D4I 0011 



0301 226e OSiO 

03tC DICE 0024 

0310 B1C9 

0311 t30i 

0314 2D«E 0020 0011 

031* :3«E 002i 



03I( i«Oi 

0320 OIEE OOOO 0017 



0334 OC03 OOOD 

032t iiti 

032C 0I2E OO04 0017 

0312 >70E 

0334 390S 

0331 0340 OOOC 

033t iiOi 

033C OOEC 0OO3 0017 



0342 OIAE 0001 0017 

0340 470t 

034* Oi2E 0014 tOlS 

O3S0 «i02 



03S1 (104 



03S4 iOOO rSK 



CHR --- I'sec Icfel put cbtt&GUi [outine, puts the chmcter into the wtite buftet. 

Enlif : (03) * chiiaotec to put in wtite buffer 
Bgffei is NOT full 



IfPUTCHR BSD 



DISINTS 



KOVE.L VSJILlPttil, M 

HOVE.B D3, (»0I« 

MOVE. I *0, WS.flLLfCAil 



.dis&ble intettupts' 

,»fl .> riLllKC POSITION OF VRITE 3IJrfER 

;PUT chit 

,5aie the new Rejr pointei in «b_iUlp 



Updiie buffer iitiibles 



KGVE.L UB.SkDRCAt), Al 

ADDA.U VBJIZEUi), Al 

CHPA.L Al, AO 

BLS.S UPCnowip 



,A1 = ADDRESS OF BUFFER BEGIN 
,Ai = ADDRESS OF END OF BUFFER 
;Is Reil pointing liefcnd buffer' 
jNo, don ' t do wtAp iroond 
itts, set front = iddt Ist bite ot buffer 
nOVE.L UBJAORIAii, WB.FILlPfkii ,S>ie the neu Reit pointer in ub_fiilp 



UPCaourp SVBQ.V II, VB.FREEUil , SINCE WE TOOK CHAR, ONE LESS FREE SPACE 
, see If buffer is full (VB.FREE is in unsigned woidl 



BKE.S 
B3ET 



UFCnolfl 

IFU1.L_V2, tfB JlSWllASi 



,not full, sibtriol sets or cleirs :CRG l:it 
, BUFFER full 



check if Ust chir is CR. If is see if should send tn IF neit tiie 



UFCnotfl CHPI.E 
BNE.S 
BTBT 
BOFF.S 
ROVE.W 



•CR, D3 

UFCnotCR ,nol i CR 

IAUIF.W2, VBJLC2tl(Ai> ,is it lUto LF tode 

UPCnotCR ,no, don't send en IF <tb l/SfSZ' 

03, DO ,siie lode fli; >kb U24II3< 



ANDI.W ILFsptsflg, 00 ,if U suppress fU; set >kb Ii24ie3> 
BKE.S UPCnotCR ,then don't send i LF 

UFCisilF BSET ISNDIF.U2. W3_rLC2tl (At I ,send IF only if SJ = ind AUEF set 

1 show buffer not eiptf. If wes output cber md end turn on iiit interrupts 



UPCnotCR SCLR 
BOFF.S 
BTST 
BON.S 



•EHPT_W2, WflJlC2tl(A«) ,test jnd cieii 

UPClson .wasn't eipty before 

iOUTE.Vl, WBJLCUKAil ,if output to user is disibled 

UPCison ,then don't start lllt int 



. interrupt will occur without sending a char 

BSR.S STRTSHIT ,iutn on interrupt 

i enable tttterrupts and eiit 

UPCison BRA CNBIKTS 



Fill: DIV.DTKOH.TEIT 



Fl«l li 



72t< 

ion: 

7201 

ntg FDia 

leiD iiis 

oiio tor: 
loot 

11(0 oil! 



KOTE: 



it ii iiiiud Ibit thiii ccitiiii III fdtictit iita Intiiioptt 



STRTIHIT - itiit III! intiiiipt pdciii by inibllDi UttT ti ittitiift 

on tiiniiit bsllii iiflf 
STOFINIT - stip ill! iBtictipt pioeisi b| diiabliiq VtRT It intiitipt 

01 tiiniilt btllii »ptr 
Sntif : D1 m viit naibic 

STITINIT 



STOFIHIT 



SITCETI 



HOVEQ 


IINITENI.DI 




.ENABLE iniT IHT 


MA.S 


SITCETI 






HOVEO 


IINITDIS.DI 




.DiskBiE iKiT iirr 


■SI 


CETBASE 




,CET UtBT ItSE ADOIESS 


NOVE.I 


CNDIECHtSI 


DO 


,CET CUBIEKT CND lEC 


MiDI.S 


ICLRD3D:,D0 




,CIE«I BITS D3 1 Dl 


01 a 


01, DO 




.DON'T CHMCE OTMEI BITS 


HDVE.I 


DO.CHDIECUkS) 


,StVE CHkHCED CHD lEC 


ITS 









rill DRV DTKOK.TCIT 



Fi«t 23 





Wl 


OOSi 






lOCO 








2041 


OtS2 






eiAE 


OOtI 


mi 




i004 







oil* 'Ml OHl 

0311 Kit 

tJIt :D<t Hit 

t3IC 222E 0CS2 

ll]«l B2II 

03M 1294 

«3tt tlOO FEOC 

tin 4E7S 



FnlCtl - fit 1 thiiiotir in tbi cgntcoi chxietii build 
ERt[) : <D0) I chirictir to pot la control chtr buliii 
inltrmplf diiibiid 



PotCIl HOVEi I CBJE«R(«6), At 

NOVE.B DO, (tO)« 

HOVE. I AO, CB.IIEAII(A«I 

BCIR tEHFT.CB, CB.FUGStHAi) 

BRA S BTRTXNIT 



AO ■ Roar pointor 

pot chic in bntlir ind Ine ptr 

put Riii pcinttt In sivi loc 

ihoH not (ipt) 

■iki lure will send chitictii 



CitCtI - got 1 chicictti 1(01 the control chirioler biiilir 
Eiit : (D3I ■ chirictir to Iroi control ebir boilii 
Intorraptf dliiblcd 
Assuiptloo : The control boiler shonld never get toll. 



CitCtl IfOVEA.l CB_FROHT(Ai), AO 
KOVE.B (AOU, 03 
HOVE. I, AO, CB.FROirriAil 



iAO V Front pointer 

ipet Cher Iroi botier tnd isc ptr 

ipot Front pointer In five loc 



MOVE. I 


CB..REAR(Ail, 


Dl 


,01 • Ritr pointer 


cnF.i 


AO, Dl 




, Front a Hear* 


BKI.3 


GCLeiit 




;ao, ftlU lore chtri in bolitr 
;|ii, bailer aiptf 


BSR 


INITCTLB 




iinlt control bnller to eipty 



ITS 



Flic DRV DTtCW.TEIT 



Pl|l 14 



I3»C 4SE7 tttt 

03tl 4D;t tilCt 

I3i4 3t3A CB4!* 

03tl <00C 



l3Ak 48E7 FfFE 
03«E 4DFII tlDkt 
eSBi 3I3A OBSit 



tSBi iigg FOSi 

tSBt lElD MII3 



I3BE Ole? 0013 
03C1 <70] 
«3C4 illO 



03Ci 0007 0004 

03Ct 4704 

OSCC ilOO 0101 

03D0 4CDF 7FFF 

1304 4E73 



1201 
1207 
1210 
1211 
12121 
1213 
1214' 
HIS 
liU 
1217 
1310 
121! 
1220 
1221 
1121 
1123 
1224! 
1223 
122i 
1227 
1210 
1227 
1130 
1131 
1231 
1133 
1234 
123S 
1134 
1237 
1231 
1231 
1240 
1241 
1141 
1143 
1144< 
124! 
1144 
1147 



DCOHIKT - DitiCol lattiiopt ititiit Iti IKIT/ICV iitirmoti. 

CBITICAl: If ID Uliiiipt occiit. thtt totb tbi ricdfi totfic iill tid Ibi ml 
bgliii ia;l| otil4 bi ttgi fliolttmoiflT^ tt ■• ml liit both 

Howifii, DBl| cact tbia Ibi tut tbaa tli 
Caiiintli Ibi ptioilt; ii titOi Ibia vtllti 

Eatii Iti Ftrt I Utiicapt 



OCOINT HOVEN.l DO-t«,-(SF> 

lEA FoclODlli, Ai 

KOVE.V UnltFO, D4 

BU.i DC I (Oil 

; Calif lot Fort 1 laliiiapt 

DCIINT KOVEH.L DO-Ai,-(SF) 
lEA FotllDlll, Ai 
HOVB.V UaitFt, 04 

; btgia gf Couoa psil iataiigpt todi 



DCIoou 



BIB 

NOVE.B 



GETBASt 

STATBI(AS),D7 



SAVE All REGISTERS 
AddiiK ol Foit diU 
Fort gait aeibtr 



SAVE All REGISTERS 
AddiBfi ol Foil 1 dill 
Fori I gall aoibii 



igil UART bill tddciii 

;CET STATUS OF UART 



If Rootiii laliriopi tbia lai 11 ihoald pioeiii cbtrtclii 

DCUoi 



JTBT 

BOFF.II 

BSR.3 



OS.RCVF, D7 

DCIaiil 

FRciCbii 



ilEST COR RECEIVE BUFFER FUll 
;iia'l. tir lilt bgf'fii iipli 
;fii, pioeiii (icolii ehidttii 



Kit Riciifi, if Tiaaisit inliiiapt tbia iii 11 eia load obiiiotic 

NOTE. THIS TESTS D7 VHICH AllOVS US TO CONE THRU HERE AFTER A READ CHECH DONE 



DCIiail BTST 

BOFF.S 
OCIFI BSR 
DCIiiil KOVEH.l 
HTE 



08_nTE,D7 
DCUill 
FRIHIT 
(SFI»,Di-A( 



IHIT BUFFER EHFTII 
KO, UNENOVM IKTCRIUFT - EIIT 
lES, FROCESS INIT 
EIIT-RESTORE REGISTERS 
EIIT IHTCRRUFT 



Fill: DIV.DTKON.T^IT 



tif :s 



( 

Kit 



1301 liiO 0011 



130k 1007 

030C tlOO (00? 

03E0 iilE 



03C1 00!C 0010 toil 

)3Ci t7i: 

03Ct IIU 1010 0013 

osri tilt 

lart OC03 otic 

03Ft i«04 

03ri <iii 

03Ft (71! 



I3FC OIII 0101 0133 

0412 «(t4 

f404 OIIE Otis 0131 

0401 UIC 



KIC illO 1031 



1410 OIIE till 1131 

I4U (lit 

Mil IIEC IIM 1133 

I41C 4E7S 



; PletChai - prcctii [ictlTtil ehtiicttt 
Eairr : 07 • ititii ttoiittr 
04 • Hit anbii 
*S > U*IT Bill ttdttfi 
U ' poit'i dilt am addtiii 



PRoChit HOVE. 8 



OATARECItS), 03 iCET CHkXClCtRS INTEtRUFT 
•BITD7,D3 :iloii't io oin ftiil I bit cbtiieliri 



chiok loi tD| iccori with rtctitt 



HOVB.I 


07, DO 




tNDI.B 


IS.EitlIti, 


DO 


BNE.S 


FRCiicoi 





;tit ilitii tcgiittt 
;iiu?i ill bat iiioi biti 
ihifi an frror 



ii tkii a GOBttol etai and (pitloeoli aiablid) and (KOT Lint tipil 
if fis thtn pcoctsi ooi eontiol char 



BTST 


IPROT.Fl, BF.PROFlAi) 


BOFF.S 


FRCnccIl 


BTBT 


•lini, BF.PROFtllU) 


EON.S 


PRCnootl 


CHFI.B 


1' ', D3 


BCC.S 


PRCnostI 


BSR.S 


FDCoonll 


BEOS 


PRCiiit 



; SEE IF Miy PROTOCOLS AT AII--CHECR HI BIT 

i No piotooti taabled, fit if can pot in bi 

i if it a Lint protocol? 

; Tti 

i ii it a control chataotiil 

; No, not ii rangt - tIF 

i Too, proeois a poisiblc OC eonttol cbac 

i tototns siio If prooiiiid a otl chat 



chtek to Ki if iipit diiablid or boffir fall 



PRCnootl 


BTST 




BON.S 




BTST 




Bm.i 


', pat clia 


In bofftt 




BRA 


i ticiift 


ttioti 


PICtrror 


BSET 




BRAS 


FRCIitdt 


BSET 


PICiiil 


RTJ 



IFULl_R3, RB_FlCt«l(Ai> ill it Fall! 

FRCIitdt ;loil data orror 

IINFE.RI, IBJlCUKAt) lii inpot dliablcdt 
FRCIitdt 



PatCbrBI 



lERR.RI, RB.FlCUUAi) /IIART irror 

PRCiilt 

•10BT_I>, RB.FlCItKAt) iLoit data trror 



rill DRV.DTtCOn.TEIT 



Fill 2« 



0420 oiiE 0001 oon 

04!t till 



0411 0C03 OOOi 

04iC i71C 

04iE 0C03 0013 

043! i70i 

0434 0CO3 0003 

0431 ((30 



043k OliE OO09 0031 

0440 i<ii. 

0443 70ai 

0444 ilSO FF2C 
0440 iOlE 



044A 

044t OtAE Otto OOIS 

04SI iioo rroi 

04S4 (012 



04S( 0C03 toil 

04St (7EE 

04SC 0CO3 0013 

04(0 ((01 



04(2 OEEE 0000 0013 



04(1 4213 

04(t 4E7S 



FDCcinll - chick fee Diti Col conlcsl cbiticliri - ENQ, ETI, tCl, ION, ind XOfF 

Eotrr : i( > t<di(si of pott'i dtti iiii 

D3 * chinctic 
Eiil : (NE) • chi( Dot oni of Ihi conliol okiricli[i 

(EO) > ctii Hii oni et Ui cintrcl cbiitctirt 



FDCcmtl STST 
SW.S 



UOHIOFF, IF.FR0F«1(A(I , ii it lOH/IOFF priUccn 
FDClebki , tii, ckk for thifi ehiit 



is lithii ENQ/ACK ot ETIfACI tolk voik thi xii vif 



CHFl.S tACIt, 03 

BEQ.S FDCUck 

CKFI.S iEHQ, 03 

BEQ.S FDCliiq 

CHFI.B lETX, D3 

BKE.S FDCllllt 



,11 it in ACI> 

iyii, writi ii not boiy now 

,11 it l> ENQI 

;rii, ill it tiid ihioU go boiy 

,1] it IS ETIf 

,110, not i control ehiiactit 



, FR0CE85 in ENQ or ETI - sind ACE ii riid not bsir 



FDClinii BT3T 
BON.S 
HOVEd 

FDCliind BiB 
BBA.S 



IBUSI.II, BB.FICUKAO ,!■ llld tlll|> 



FDCldidit 
•ACK, DO 
FutCtl 
FDCldidit 



ijii, find ACK Mtait oliir Boif 
;no, thin iiid ACE to othit lidi 



FR0CES5 in AH md > EON - cliit vriti feon 



FDClioi 

FDCllck BCLB 
BSI 
BBA.S 



iBirst.vi, VB.FicunA(i 

STBTIHIT 
FOCLdidil 



iiltit iiidint i(ii> 



Cbiek lor i lOH or i XOFF 



FDClcbki CKFI.B 
BEQ.S 
CNF IB 
BNE.S 



HON, D3 
FDClios 
•lOFF, D3 
FDCLiiit 



; FBOCESS i EOFF obitiotir - lit vtlti boif 

FDCllofI BiET «BUEt_VI, VB.FLCUKAO 

FDCldidit CIR.L D3 

FDCllllt BTS 



,ii it in EON> 

;fii, writi if nit buif now 

;ii it i> ENQ! 

,10, not 1 control cbirictir 



;iboti procoisid 



till DRV.mCOHTEIT 



Plft 17 



H«C iO(E 0(34 

Wt IOCS 

147: ill4l 0034 



1474 22IE 003C 

047t DIEE 0040 

•47E IIC« 

0410 t30« 

1411 IDtE Otic 0134 

0411 S3tE 0041 



04(C (404 

04IE OICE 0000 0031 



1474 OltE 0001 0013 



0471 OIIE 0000 (OH 

04*0 4701 

(4*1 ((IE (0(0 0(13 

04M 41(2 

(4U 41(1 

(4«C 4E7S 



I343> ;PltClllBl -tVT A CHklACTEIl INTO THE READ BUFFER AHD RETURN -ADJUST COUNTERS I FOIKIERS AS REQ 



COMING IK D7- CONTAINS STATUS WORD D3 CONTAINS CHARACTRER 
AS POINTS TO UART 



; BUFFER HAS ENUF SPACE, JUST ADO CHARACTER 

FotChrBI HOVEA.I. RB_FIltFIA4l, A( 
HQVC.B 03, (A(l« 
nOVE.l A(, R8.FIUF1A4I 



iddtess wbirf to pvt chiiactit 

AUTO ADJUST POINTER 

RESET THE FILL POINTER RB FILLF 



Updtli bufitt iiiiiblts 



KOVE.L 


RS_BADB(Ai), Al 


ADDA.V 


RB.SIUlAi), Al 


CNPA.L 


Al, AO 


BIS.S 


FCDnowtp 



;A1 • ADDRESS OF BUFFER BECIN 
;kl > ADDRESS OF END OF BUFFER 
;I5 Reaf pointing biyond baffcr? 
,No, don't do Mrip itoond 
; iTci, stt front > addt 1st bftt of boffti 

HOVEL RB_BADR(A4I, RB.FIllPtAil ;SiTi th( niH Real pointii in ib.fillp 

PCBaovrp SUBO V (1, RB.FREEIt4l .SINCE VC pot in a CHAR, 1 LESS FREE SPACE 

; fti if bnffot i( fgll (RB.FREE is an onsijnid vord) 



BNE.S 
BSET 



PCBnotfl ,not foil, fubttact sits o: cliars ZERO bit 

(FULL 11, RBJLC3tnA4l , BUFFER fill 



; bBffit for sun is not eiptj 

PCInotfl BCLR (EHFTJl, RBJLC2«I(A() iRESET ENFTI FLAG ANVHOO 

; if piotoools enabled and NOT Line tfpe protocol then check buffer for hi water lark 

BTST (PROT.P!, BF„PROF(AJI , SEE If ANI PROTOCOLS AT ALL-CHECK HI BJT 



BOFF.S 


PCBeiit 


; No protocol enabled, eiit 


ITST 


• Line, BF_PR0F*UA4) 


, is it a Line protocon 


BON. 3 


FCBtiil 


, Its, eiil 


iSR.S 


CbkRciBasT 


i check for riceiie bus; stale 



PCBeiit 



ITS 



Fill. ORV DTKOH.TEIT 



P>4t 21 





IE m» 




it «H1 




te oeu 




02 




?5 





EE note 


0«31 




IE 






2E ItOI 


0013 




Oi 






13 




04D) « 


DO FEAC 




I1D4 41 







; ChkRciBity - ebtct l«t riciiii tsif 

, ti sitfl o( baffti noH it oi ibovt higb wttii iitk 



ChkloiBofr KOVE.V IIB.SIZC(A«), Dl 

SUS.W II.FRttltil, Dl 

CNF V M.HIVtlltl, Dl 

ICC.S CoRcilgii 

CRtlllil ITS 

ColcflQiy - goto tht Rtctlri buflT itttt 
iisnifi iBtcicapts <ti tbiBtd off 

GoRcvlnsf 



CliSiiit 



BSET 


IBUSI.It, RB.FlCUKAi 


BON. 5 


CHBSilit 


BT5T 


IXOKIOFF, iF.PBOFtKti 


lOFF.S 


CRBSlllt 


HOVEO 


ItOFF, DC 


BSD 


PotCtl 


»TS 





.BUFFER SIZE (ADDRCtS OFI 
.Dl ai BQftbit of chill in bgffii 
, at o[ ibOTt hi Mittr iiit! 
. Ti>, goto but; itilt 
.No. thm lilt 



; iliiid) baif 10 di«t find cbii. tut 

.sind bTti 10 ilbti sidi iiTiBI not biif 

.oDlT if lOHflOFF piolocol 

.iind lOFF 

;pit in ciaiiel cbii biiiiii 

^if ETIUCS 01 ENQiiCK nclhiot ilii to do 



Filt. DRV DTtCOH TEIT 



Figi 21 



04Di gtJE 0001 00S7 
0*I)C UIE 



04CC OliC 0000 OOIS 

D4E4 iiOC 

04Et 08:E OOtI 0017 

one t70k 



04EE MH 007C 



04F2 UOO FEiO 
04Fi 400i 



04ri UIO 
04Fk 4002 



04FC il02 
04FI 4E7S 



; PRXKIT - ptofltsf ttiasiission intenopt 

, Jml stnd th< nut chiiittii il posiible 

ENTRY : (AS) ■ UART BiSC tlldicif 

; (A<) • idditis tf pelt's diti no 

; (041 > unit noibii 

; ^ (D7) > itiloi b(li Iroa VART 

PRIHIT BTST lEHFTJS, CB.FLACStKAil icontiol chit itiiUblf) 
BOFFS FRXgdctl ;i>s, itid it out tilt 

) jl NOT Bui7 It Buffer not lapty find oat nut cliificter 

BTST IBUS!_VI, VB_Ff.Clil(Ail iBoif) 

BON.S FRIoff ,Tti. tun off Hit int 

BTST lEHFT.V:, VB.FLC2>l(Ail ,tgtfC[ liptf! 

BOFF.S FRItind ,N0, tend mil cliit 

i cliick for in Aftcrnitc boffet tfiilible 

BSR wChtAitBf 

; tain off iiil intt 



FRIoff 



BSR 
BRAS 



STOFINIT 
FRIiiit 



got noit ctiarictei in buffoi ind iind oat 



FRIstnd 



BSR.S 
BRA.S 



SendNiit 
FRKiiil 



; got noit control ctiitiotor ind sind it out 
FRIgitotl BSR.S SendCtl 
FRIciit m 



rili: DRV.DTtCOn.TCIT 



Ptgi n 



tsoo utg rti: 
ISS4 1B43 ton 

tStl 4(73 



SindCII - iind nut conticl cbiiidtc Iroi contui ehiitctei bslltc 
EHTRT . (tSI > \!m Bill td4ltll 

Ui9 > additis o( port's it\i «iil 
(D4) s stilt Buibci 



StndCtl 



8911 

HOVE, 
8TS 



GitCtI 

D3, DUTtlEKASI 



,Git chat isd upditi ptii 
, FU9H CHJLRkCTER OUT 



Fill D8V DTKOH.TEIT 



Figi 31 



t ritiHiT 



oso« IKE eoic 

tSOE IBSI toil 
9311 iD4l Otic 



osu :2«E ot:o 

tSU 02EE oil* 

ISIE IIC! 

tS2{ >30( 

tsii ma Olio ooic 

0:11 S2iE Otli 

OSIC OUE OCOO 0017 



iS12 322E Otli 

0S3( SUE 0014 

isi* an 

033C illO 

I93E tlEC 0001 1017 

•S4« «I2I 



ISU 4ltE 0111 

l]4t 111! MtO 

K4t <71A 

tSSI (III 1102 

0SS4 iil< 

IH4 Olio 0117 

OSSt <70E 

IMC <03l 



I9SI MEE 0011 OOIS 
ISi4 IIEE nil 0117 
tUk 4t7S 



StidNtit - Put ncil ehirictti In vrite boifii in VtRT tiiitall bufti. 
EKTR« ; (AS) • UAIT Blit tddllti 

(A4) * iddriss of poit'i d4ti trcs 
(D4> s unit Duibii 

SindNilt HOVEL WB.EHPTKAi), AO ;A0 >) EHFTIINC POSITION OF ED SUFFER 

HOVE. 8 (A0)», DATARECIASI ; sind oat thi neit chitictti 

HOVE. I, AO, VB.EKPmAi) ;Siti tht n<« Front pointti in rb.tiptf 



tlpditi bulftc fiiiiblii 



HOVE. I 


VB.BAORIAO, Al 


ADOA.W 


VE_SIZE(A«), Al 


CHPA.L 


Al, AO 


BLS.S 


SNInoHip 



HOVE. I 

SNllowcp ADDO.V 
BCIR 



,AI = ADDRESS OF BUFFER BEGIN 
;A1 > ADDRESS OF END OF BUFFEI 
;Ii Front pointing boyond bnffit! 
iNo, don't do vtip tioond 
:!ts, lit front < iddr lot bfto of bofftr 
VB.BADKAi), VB.EHFTycAO iStit tbo lOM Front pointir in wb.iipt; 

II, VBJREE(Ai) ;5INCE VE COT CHAR, ONE HORE FREE SPACE 
IFUll.Vl, VB_FLC2«IIA<I iilHiiit not full 



foi if buffer ii (apt; 



KOVE.V 


WBJREECAi), Dl 


CHP.V 


WB_SIZE(A<),.DI 


BCS.S 


SKInotil 


BHI.S 


SNEiiirr 


BSET 


IEHPT.W2, WBJl 


BSR.S 


VChkAltBI 



i OF FIEE LOCATIONS - BUFFER SIZE 

not eipti if frtt < sin 

tilt irror 'BUG if h>ppint< (frii ) iiiil 



IEHPT.V2, UBJlCitUAO ; BUFFER tiptT'tmn off inl nut occgrinco i 
, sot if fhould iwiteli to in Altornito bqffi 



if Proloooli inibltd ind eltbir ENOMCt or ETI/ACK tbin obiok 
if ibonld iind in END or ETI 



SNIaotit 



lEA 


BF_PROF(A<), AO 




HT3T 


IPROTJl, (AO)t 


;protoeol iniblidt 


BOFF.S 


SNIfilt 


ino. Hit 


BTST 


lENOACE, (AO) 


/ENQfACR proioooH 


BON.S 


SNZont 


;7is, itt if fkould ttnd in END 


BTST 


lETIACE, (All 


',ETtfACK protocol' 


BOFF.S 


SNEdit 


mo, iiltt 


BRAS 


CntCbiri 


;ehick if tiu to tind ENQ or ETI 



SNIont 

; Silt trror - iit Error fltg ind iplit 



SNIiiirr ISET 

BSET 
SNItilt RTS 



lERR.VI, VB_FlCltl(A«l iihow flu Irror 
IENFT_V2, VB_FIC1«IIA«) ; urk BUFFER tipt| 



File DIV.DTiCOK.TEIT 



Figi 31 



esic gaiE otti o«u 

«S71 i7]ll 

eS7< 4SEE tdS 

gS7l tl)2 OOSi 

o:7c iui 



nn lOiE 0011 

DSIl 301E o«ic 
OSli (100 0U4 



OSOI Otll 0107 

OSOI ««01 

OStO 0072 0000 



0S74 4E73 



VCbktItIi - ctict il iltfditi biifli[ iHitcb til viiti bgffii 

lait inpit it iiloiititilly OliiOltO «liii iiii cilli aniltttlit 
to ivileh feofltff 

Eslif ti ■ itdiifi «f fort'i diti i[(i 
iatiiiipti diittlid 

VCtUltBi BTST OEHPT.Vl, V9JIC1«1(«(I ,it bofill liptf! 

tOFF.S xCtaiill ,i><i, ein't iwitck 

lEA WB.FIG1»1(A6I, Ai ;A2 > iddiiii ol viitt boflii fligi 1 

BCIR OAITIF.VI, (All ,ii in iHiiniti bslfii iiiiliblt! 

BOFF.S vCABiiit ;no. nolbiiq Is fwitch 

; Svitcb bnlfiii bT itking tbi AUirniti bnlltr Ui aiin boidi 



HOVE. I VB_AIAtlB(A«l, AO 
HOVE.W VI.ASlIEIAil, Ot 
B3R SttupWI 



qil MV biifd iddiifi 

ind litgth 

ivitcb boffir in tibli (doiint ast All 



i li out if NOT ctBtitlliig tbi Iiit infit diftbli bit then inibli 



BTST 


IlKPC.Wl, 


(A2) 


lOM.S 


HCABtlll 




flClI 


IlKPE Wl, 


(All 



;if sii[ conUoilUg input disibli^ 

:siir li GOBt rolling, tiit 

iiLt, intbli input to batfit froi osir 



wCiBtiit fiTS 



File omr.OUCON.TEIT 



Figi 33 



tS!J iUt HiE 
iSfl 3giE OOOE 
OSIE SOiE ttiC 



tSAt 7oo: 

OSU 0I2E gODi 0013 

OSAC iiOi 

•SAC 7003 

ISSt ilOO FDCO 

OSg< *itE OOiE 

OSES OOEE 0000 OOtS 

OSBE U7S 



CntChiri - lie if icat tnougb chaiicten tc sind out tn ENQ ot ETZ 

Enlif : Ai I iddiiif ol poil'f dtti tut 
(AS I • UART till tddtiii 

<D4) < unit noibet 

Protoool it tithti EKQIACK oi ETIUCK 



CntChtrt 



9tl III clitii bitvifo Itst ENQ 01 ETI, itnd motbtt tnd ;o Hti oitil rtctlii ACK 



ADDQ.y 


• 1, VB.BEKaiAO 


idd 1 to ehir coitt boltitiD ell cktti 


HDVE.V 


BF.BTV)iEA(Ai), DO 


git III tUovtd bilmiii 


cnp.v 


VB_BENO(Ail, DO 


did iind iti? 


BHl.S 


CNTllit 


no, tbii nil 



CKTinq 



CNTllit 



HOVEO 

BTST 

BON.S 

NOVEQ 

BSR 

CEB.V 

B3ET 

RTS 



lENQ, DO ;iiiuii iind tn END 

lENQACK, BF_PROF«i(Ai) lENQ/ACK protoool! 

CNTinq ;|i< 

lETI, DO ;ii ETIfACt piotoool, »nd t> ETI 

FiitCtl ;piil cbi[ in eontiol ebtt Inlfii 

VB.BENQlAi) iolott in bitwiin coant 

IBUSt.Vl, WBJICWKAO igo «iiti boiT 



Fill: DRV.DTACOH.TEIT 



Figt 34 



OSCI 48E7 mi 

SSC4 40FA U»i 

OSCI 3<3t OflEt 

OSCC ilM 

tSCE 4DFA OIBtt 

gSDi 3i3A Sfiit 

OSD( UOA 



05D« ICDF 7FFr 
OSDC 2F3A tltEt 
OSEt 4E7S 



DCTLINT - Diti Coi Ceitrol titiitgpl itiiiti lootini. 

Kikii chick for botk Foiti. 

Cilli thi [DQlisi it iddiiii mid iB SETVECS icutim daring initiil. 
Aiiuui it Kill eliii tht inlirripl, toggli lOI. Thi liit toutlii in Ihi 
chain thiold bi tki OS teiil i loitini which dsti Inn cii thi iitiiispl. 

Ignorii th> iitiiiipt i( mia't i DitiCoi Contiol iatittopt, 
thtiiicii IB Appli <lot iiliiiDpt, cr ii NOT Liii typi 
hindihaki iithod. 



DCTIIKT NOVEM.l D9-Ai,-<SFI 

lEA PoitOOlll, Ai 

MOVE.V UnitFO, M 

B&R.ft Chklinti 

LEA FoctlDltl, Ai 

HOVE.V UnilFl, 04 

iSR.S Chkliiii 



;SAVE KECISTEIS 

jde ict Fort firii 

icnit nnibiE «f Fort 

;de fci Foct 1 Ii[it 
.cnit nsibir el Foit 1 



• lit ty tiilcting tigiitiii iBd thin gcing to tcglini it mid iddiiii 



NOVEK.L 


(SF)f,l)0-Ai 


,EiiT-aESToiiE hccistehs 


HOVE. I 


SiTilfll, -(SF) 


,iiki iBtiiigpi ilait 


ns 







Fill: DIV.DTKMI.TCIT 



Flgi 3S 



tSCt 41U 

tsit ut« ttn 



tsci tiic ogtc ogi: 

tStt 1710 



tSFI OIIE ec«t 001) 
tlFt i72l 



tsri «i2i 



isFt uiE oeis 

tSFC ilOO tkU 

•tea otcE 0000 oois 

0«0I «I3( 

KOI UlO 

Otoe oikc otao OOIS 



•ill tto} 0000 

till 4704 

0111 iite rojE 



otic itOO FA)E 
ItlO 4(73 



ChkLiHf - IK if cbiigi in linti for the poitStpicif iid bj ti ini D4 

Entif : D4 > giit noibit fgi thi coirint port 

Ai I idditss of dati net for the oairtnt port 



ChlLmti cm L 
BSR 



Di 
GETBItSE 



;fo[ dlsibling intotiupts 

/iftnp UART bisi [It (AS) •ll^lii* 



Sit if <i| piotocoli It ill aad if lo if in; iii line prcts 

;N0 PR0T0C0t5--GET OUT 



BTST 
tOFF.S 



• PBOT.PJ, BfJROFtAO 
ClNeiii 



If (tfpe of hindihiki () Unil then iiit 



BIST 
B0FF.9 



illNE, BF.PROEtUAi) 
ClNeiit 



,NOT LIKE HANDSHAKE, EXIT 



Detitiine which Line is and is BnsT line Pott A 



BSR.S 



FINDLIN 



;HEEDS D4 : Unit noibet of enitint pott 
iictnrns bit nnibet to cbecfc in DS 



jset or clear finsT depending on state of line and whether it's Bnsf interted or not 



nOVE.B 


WB.FICUHMI, D3 


,SAVE BUSr ELAO 


BSR 


OlSIKTS 


iDISABlE INTS 


8SET 


IBUSI.VI, VB.FUUUAi) 


, ASSUME LIKE 15 BUST = TRUE 


BSR S 


TSTIINE 


JEST LIKE 1 INVERTED FLAG (clobbers 01 t 


BNE.S 


ClNenbl 


ilS BUST 


8CLR 


IBUSY.Wl, WB.FlCUUAi) 


;not bnsf 



if tfisn't Bbst bifvr* thtn ittrt up tcaasiissioD process 





BTST 


•8UST_V1,03 




BOFF.S 


ClNenbl 




BSR 


STRTIKIT 


; enable 


intermpt* 




ClNenbl 


BSR 


EKBItnS 


ClKiiit 


RT8 





TEST SAVED BUST STATE 

WASN'T BUST 

START IHIT IF BUFFER NOT EHFTV 



rili: DRV.DTtCm.TtlT 



Figi U 



Utl Hl\ 

tm 7191 



Oil, 
•«! 
til 

till 
til 



ttti 



lili Il7t tlllt 

tilt iltl 

tilC iitS 

tilE U7S 



ttti tr7r 

Otii till 



flhangid Ifteticii t« ntaiR ftiae in OS ■1-11-11 kb* 
riHDLIN - Find which lini i< tut lor Hindihttiag in Foil k 

nni . (041 ■ gili niihir 

li i lini (|(i piotgcol 

HIT : IDS) ' Bit I in F«[t A fpiGiffing lint and (or Bisf 



riNDlIN 



HOVEO 
nOVEQ 



11,01 
ICTELIN.Ol 



,iiT kuhber in port a coriiesponoinc tc 

,FL«i! BIT NimSER 



, Asiuiti thit it will litrari find i lint Htg stt 



FIKIOOK 



,1S tlT SET' 'l-i:-t! kb' 
,TE9, 01 FORT A BIT FOB DC 

iTRV NEXT BIT FtAO 
,010 LAST FLAC 
;N0 



il (Fell 1 li unit noibtrl ibtn bill ■ bitl > 1 - DC 1 bill in Fort A in nut bil op 



rsT 


Dl, BF_PIOF«hAII 


RONS 


FINCOT 


ADDOB 


11,01 


ADN.B 


II, Dl 


CHPI.B 


lOCOlIM*!, Dl 


8NE.S 


FlNLOOt 



FIKCQT 


CKP.V 


b'nitPO, 04 




BEQ.S 


FLNEIIT 




ADDQ.B 


it, OS 


FINEIIT 


RT3 





,if It Fort 0> 

ips, tben eiit 

,10, then Fort 1 ind idd 1 to bit noibtr 



, ehtngid liietion to ricoiii bit noihir paraulii in OS '1-12-11 kb< 

, TSTEINE - lilt Pott A lini litd lor Boif ind Ihi invirtid flig to thou il 

Biif er KOT Biif 
, EKTRy : (OS) • hit nuibir ii Port A of Eini otid b; 8097 

EIIT (HEI > Bo<r - Di • SFF 

(EOi ■ NOT Bui; - 01 ' 100 



TSTLINE 



BTST 

SNE 

BTST 

SNE 

EOR B 

RTS 



OS, KHIRA.L ,Cttit( Lini Rooliin 

01 

IINVBUSI, BF.PROFtl(Ai) ,Criltl Initttid Boollin 

Dl 

01,01 ,1F RESULT IS JFF THEN BUST 



Fill: DRV DTACOH TEIT 



Figi 37 



IiS4 ilOO FMO 

OISI ilOO FtIA 

OiiC ilOl 

oiJE an 

out iUO FkSA 

g(i4 4E7S 





206E 




0034 




iDiE 




0031 




30tE 




0042 




4:tE 








ISEE 




0033 




3DiE 








4iiE 








!D(E 




0011 




iD<E 




OOIC 




3D«E 




002t 




42tE 








DSCE 




0017 




OIEE 




0017 




33iE 








4i<E 







0iB4 iOOO FtEE 



04BI 0100 OOtO 

UK «704 

04BE 4100 FBB2 

tiCJ 4E7S 



COHCIR - UNITCIEAB 

Isitiiiiic Bofteii to tipti. InilUliie Couunicitions ctnttol 
fiiiiblts. Initiiliit HART lioi Fiiilti Control Tiblt. 



HCIR BSR 


OISINTa 


BSR 


SETUART 


B5R.S 


InitBgfs 


BSR.S 


ClrBosy 


BSR 


ENBINTS 


RT5 




InitBots - iaitii 


III teid, w 



.DISABLE IKTERRUPTS 

, INIT UART FROH CONSTANTS i TABLE 

iiRitUIiii riid ind wiiti boftics to iHpty 

;cteii basT fUgs 

.ENABLE INTERRUPTS 



Elit 



ind control boEfiis to CBpty 
inibii out ind in bound on both buffits. riiovi alt boEfiii 
(001 ■ old bosf (lit lor tiid boifit 
(Oil • old boi! iUg for wiiti bofiei 



InitBuli 



MOVE.L 


RBJADRtAil, 


BBJ1LLP(A4I 


HOVE. I 


RB.BADBUil. 


RB.EHPT«(A4I 


MOVEW 


RB.SIZEIAil. 


RgjREE(Ai) 


CLR.U 


RB_FLC2(Ai) 




BSET 


IEHFT.R2. RB 


.rLG2tl(A4) 


HOVC.W 


RB_FL01(A(1. 


DO 


CLR.W 


RBJLCKAi) 




KOVE.l 


WB.BADRlAil, 


UBJILLF(Ai) 


MOVE.L 


VBJADStAO. 


WB.EHFTYtAO 


HOVE.V 


WBJIZECAi). 


WB.FREE(A4) 


CLR.U 


WB_rLC2(A4i 




BSET 


IAULr_W2. VB 


JLC2«l(Ail 


BSET 


IEHPT_V2, UB 


.FLC2»I<A4I 


HOVE.V 


WflJLGKAO, 


Dl 


CLR.V 


WB_FLCUA«I 





BRA 



INITCTIB 



Mnltialiii front and 

i riar pointirs 

iihow couDt as all frii 

; resit AutoLf. si&d LF. Full and Lost 

; BUFFER IS EHPTI 

iCET old busr flag 

jrisit all flags 

;initialiia front and 

i rear pointers 

;show ooont as all ftte 

i reset send LF. Full and Lost 

; 00 AUTO LF and 'tb l/S/)3< 

. BUFFER IS EMPTt 

iCET old buif flag 

;risit all flags 

.init ctl char buffer 



CltBusf 



if Read buffer «is busf then tend oii NOT busT iUte 
ignori writt busy for non 

Entry : 100) ■ old busy 'lag for riad buffir 
(Oil > old busy flag for «rlti bgffir 



CItBusy 



BTST 
BOFF.S 
BSR 
RTS 



1BUSt_ll, DO 

CBSeiit 

CoUnBusy 



iiay hare to check if hare 
iprotocois and not line typi 



Fill: DRV. DTICON. TEXT 



Pl|i 31 



OiCt 

OiC< 08iE OtOI 0033 

ttCt S7C0 

OiCC 1200 OOtl 

OiDt *e;s 



OiDi itOO FfCi 



I«Di itOO FASI 

OiDA IS'C OtOl OOOS 



UEO 41Fi 0070 

o(e4 nFS OKI 

0«ei 4SFt tOlAt 

OiEC BI7A tlHi 

art i702 

liEi C3«l 

tiF4 lOIA 



OiF« B3II 
OiFI Hit 

oiFt UFA 07ro« oo(« 



0700 iOOt F(IA 



0704 U73 



COnSST - VHITBUST 

PASCAL lOOlEAN TlUE HCTI/RNED IK DO IF THERE ARE ANV CHARACTERS IK READ BUFFER 



COHBSI 



BIST 
SEQ 



ANDI. 
RTS 



lEHFTJi, m.FlCZtUAt) 

DO 

ITRUE.Di 



,IF BIT MOT SET THEM > t, CHARACTRERS EII3T 
.COHVERT FROM BOOLEAN TO FASCAl 800LEAN- 



COmiNXT - UNITUWOVNT 

TgiBolf intiruiit cipibiliUti «l COMX <[iiii. 
Rfitod iictocf. 



coHUNirr 



BSR 



DISIKTS 



BSR CETBtSE 

NDVE.B ITVRHOFF.CHDRECKAi) 

tiTi iiclcrs polit t< 1 RTE iiitoclitt 



LEA 


VEC4.V, At 


LEA 


VECi.V, At 


LEA 


THERTE, Al 


CHF.V 


UittFI, D« 


BEO S 


CimiiFO 


Etc 


A«, Al 


NOVEL 


A2, (A9) 



CUKllFO 
il both fietaci peUt it RTE tbia fit Iifil I l« nni ttituf 



.DISABLE IXTERRUFTS 



iCET UART BASE 
.TURNOFF lART 



iiifiii il ii Foil • 

ii^diKi g( till RTE UiliQclita 

;ii It Itil 0! 

iM<< cll«I|< iKll 4 

;>«, ckiaii Itiil 1 

ilil iictii (• (tilt It RTE 



CMFN.t 


(Al)*, <A1)« 


BHE S 


CVMili 


MOVE I 


Siftlilt. VECI.V 


, Riftcii laticiipti 




CUHdiil IRA 


ENBIMTS 


, THE RTE INSTRUCTION 




THERTE RTE 





;H*t it |oit lac. 
idifliitil It ail Itik RTE 
;riatiti In* ittil in* 



hli: DIV.DTKOH.TEIT 



Pigi 3t 







1754« 












t7Si< 


consi 


- VMITSTRTVS 








17S4* 


till 


III TikU ck4>| 


i or bailti f[ii 






1757« 








«7li 


0C42 0014 


I750« COHST 


cNri.w 


0TBISTATE,D3 


t70k 


4310 


175»« 




BHI.S 


CSTERR 


t70C 


3013 


1740t 




HOVE.V 


(A3), DO 


l?Ot 


43rA OOtOt 


174»« 




lEA 


CSnBt.Al 


•713 


e94k 


17«» 




ISl.V 


01,02 


0714 


3431 1000 


17(3* 




HOVE.V 


0(A1,D1.VI,D3 


0711 


4EF1 2000 


1744' 
I7(S« 




m 


0(A1,D3.V) 






t744> 


iRTillO Faatttca Ccdt (iror 






1747* 








t71C 


7E30 


1740> 


:STEIII 


KOVEQ 


•IKVrKC,D7 


07IC 


4t7S 


1741* 
1770* 




RTS 








1771« 


THE COM DRIVER STATUS JUHF TABIE 






1772« 












1773« 


(met 


itui ««Brttlbli 


with cIO printtr 






177»t 








071O 


002E 


i775« csmi 


OATA.W 


STVBUr-CSTTBl 


0721 


0040 


1774« 




DATA.V 


STBAUO-CSTTBl 


0724 


OOSO 


I777« 




OATA.V 


STPBITt-CSTTBl 


07n 


0030 


1770« 




DATA.V 


STRBUF-CSTTBl 


0770 


0010 


I777« 




DATA.V 


STWRDSZ-CSnBl 


0711 


007E 


1700* 




OATA.V 


STHNOSI-CSnBl 


071C 


0144 


170It 
170I* 




DATA.V 


STiFSTS-CSTTBl 






17031 


atw {onctiest 








1704« 








07]t 


OODl 


170St 




DATA.V 


STRDSTS-CSTTBl 


0730 


0122 


1704* 




DATA.V 


STvrsTS-csnBi 


(731 


0010 


1707« 




DATA.V 


STRDHI-CSHBl 


0734 


OOIE 


1?40« 




DATA.V 


STRDlO-CSnBl 


0734 


OlBt 


I707« 




DATA.V 


STOOTRD-CSnBt 


0731 


OICO 


17»0« 




DATA.V 


STINRD-CSHBl 


07311 


01D4 


17»1« 




DATA.V 


STOUTVT-CSnBl 


073C 


oiri 


17H» 




DATA.V 


STIKVT-CSnBl 


0731 


0332 


17»3« 




DATA.V 


BVBCHR-CSnSl 


0740 


033E 


17t4> 




DATA.V 


BRBCHR-C3TTBL 


0742 


00C4 


17»5« 




DATA.V 


STATOIF-CSTTBI 


0744 


OOCC 


17»4» 




DATA.V 


STBENQ-CSnei 


0744 


024A 


1777« 




DATA.V 


STRDAlTBF-CSnBl 


0740 


0372 


17»0« 




OATA.V 


STVTAlTBF-CSnBL 



VALID FUNCTION CODE 

NO 

GET PARAMETER 

TURN THE FUNCTION CODE INTO 

AN INDEI TO THE FUNCTION 

iOO FUNCTION 



WRITE BUFFER FREE SPACE 
SET BAUD RATE 

SET parit; 

READ BUFFER FREE SPACE 
SET VORD SIZE 
SET HANDSHAKE METHOD 
TELL BUFFER COVFROl STATUS 



TELL READ STATUS 

TELL WRITE STATUS 

SET READ BUFFER HI WATER MARX 

SET READ BUFFER LOW WATER NARK 

TOGGLE OUTBOUND READ 

TOGGLE INBOUND READ 

TOGGLE OUTBOUND WRITE 

TOGGLE INBOUND WRITE 

TELL 4CHARS IN WRITE BUFFER 

TELL OCHARS IN READ BUFFER 

TOGGLE into LincFetd fUg 

SET noiber of chtit bttweto ENO's 

SET Rciil Alticniti bntlii 

SET Wiitt Aitcintti bgfftien ENQ's 



fill DRV DTtCOH.TCIT 



Pigt m 



I7U (100 FfU 



0741 ilFk 

07SI 3(AE tOii 

1734 iOlO Ffii 



e7SI ilFO 
07St 3ikE 1142 
173E t0F4 



1741 IC40 OIK 

07(4 (234 

07(( 41EE OOtI 

I7(t <3FA 021Cf 

I7(E (OlE . 



1770 0C40 0014 

0774 (224 

077( 41EE OOOC 

077A 43FA I2A3« 

077E (OOE 



0700 0C40 0001 

0704 (214 

1714 41EE OOID 

070A 1000 

I70C (004 



07IE lOBl 0000 

0772 (IK 

0774 (100 Ff4E 

0771 (OIA 



07n 7E3( 
07»C 4E75 



STCillDii m DISIHTS iDISABlE DTTERRUPTS 

STVIUF ■ Ritacs to tkt use tit Ftti iptci in thi itriti boKir 



STVIUF ISR.S STCiIIDii 

NOVE.W VI_FREE(A(), (A3) 
STCtUEnt BRA ENBINTS 



DISABLE DTTERRUPTS 
WRITE BUFFER FREE SPACE 
ENABLE IKTERRUPTS 



, STRBUF - litirn tg tbt uitr Ibt Fttt ipiet is tbt READ bgflic 



STRIUF BSR.S STCiUDil 

HOVE.V RBJREEIAO, (A3I 
BRAS STCillEnb 

STBAUD - Sit tilt BiiO Iitc 

3TBAUD 



DISABLE IirrERRUPTS 
WRITE BUFFER FREE SPACE 
ENABLE INTERRUPTS 



CIIPI.V 


IHAIBAVD.OO 


;IS IT A VALID PARAMETER 


BHI.S 


SETERR 


;N0 


LEA 


BFJDBD(A(), AO 


.WHERE TO PUT VALUE 


LEA 


BAUDCHV.Al 


.CONVERSION ARRAT 


BRAS 


SAVFARH 


;SAVE CONVERTED PARAMETER 



STPRITI - Stt tbn Puitr 



STPRITI 



CMPI.W 
BHI.S 


OHAIPRTI.OO 
. SnERR 


.IS IT A VALID PARAMETER 
,N0 


LEA 
LEA 
BRAS 


BF_PART(A(), AO 

PRTYCmr.Al 

SAVPARH 


;WHERE TO PUT VALUE 

iCONVERSION ARRAT 

;9AVE CONVERTED PARAMETER 



, STWRDSZ - Set tlii word 9ii( to Irnsnt (7 oi 0) 



STWIDSZ 



CMPI.W 


OHAIVRDS.DO 


ilS IT A VALID PARAMETER 


BHI.S 


SETERR 


;N0 


LEA 


BF.WRDStAO, AO 


;WHERE TO PUT VALUE 


HOVE . B 


DO.(AO) 


.PUT IN WORD SIZE VALUE 


BRA S 


RSTUART 


; RESET UART FROM TABLE 



, ctuon eodt io 5T1AU0R, STPRITI, STWRDSZ, STDTACDH. ( STHNDSK 



SAVFARH 



MOVER 



RSTUART BSR.S 
RSTVARTl BSR 
BRA. 5 



0(A1,DO.W),(AO) 

STCtllDii 

SETUART 

STCillEit 



,SAVE CONVERTED PARAMETER 

DISABLE IirrERRUPTS 
SETUP UART FROM TABLE 
ENABLE IKTERRUPTS 



iKiIid Piriutei titoi 

SETERR HOVEO 0INVPRH.D7 
RT( 
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07H 43rA •27(« 
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07C0 iOtO 



07C2 OOiE 0007 0013 

07CO iiOO 

07CA OIIE OOO: 0013 

07D0 (704 

07S] 42iE OOIE 

07Di 4E7S 



STKNOSK - StI H<a<fttki trpi. Covitt pittutit isU thi fUjf ind pat thid 
iU| *il<ii Into tki FcUttt Ccntrol Tiblt. Don't nitl to nut 
VAIIT. . 



STHKDSI 



CKFI.W 
IHI.S 

lEA 

KOVE.B 



OHAIHNDS.OO 
8ETERR 



i IS IT A VALID PARAMETER 



HHDSCNV.Al iCONVERSIOK ARRAI 

0(A1,DO.W), BFJROFtl(Ai) ;ii>fi niw (U«f Uto fli| bfti 



i lit II ••« liiiblid all pr'«to<ol> 



iSET 


OFROTJl, Br_FROF(A») 


IST.B 


BF.FROFtKAi) 


BNE.S 


SHDobkEA 


BCIR 


0FHOT_F2, BF_FROF(A«) 


BRA.S 


SHDiiil 



SHDehkCA BTST 
BOH.S 
BTST 
BOFF.S 

SHDitfo CIR.V 



OETXACK, BF.FROFtKAi) 

SHDllta 

lEHQACR, BFJROFfUAO 

SHDilit 

WBBEMQIAO 



liiiaii biTt i ptclocol 
;tF iito tbtn no piotscoli- 
iiit If ETIfACK or ENQ/ACX 
,'ihow no piotoGol 



;is it ETI/ACR! 

;|I9, iito obtr ooint 

lis it ENO'ACK* 

mo, tiit 

;elr cnt ol chttf bitmta ENQ'f oi ETI's 



SHDiilt 



RTS 



rill: SkV.DTUOH.THT 
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l7tC )DS9 ltl( 
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STIDMI -SET TMI l»D IVrFEl NICK Vmi fUlK 

tnOHt HOVI.V (U), tl_MIWl<itl 
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STIDIO -StT THE KtD lUfrCI lOV VUH IU» 

STIDIO mVt.V («]), IIJOWKU) 

in 

STtTlF - tMflt Ui Ult Utttttt IU| 

mmr ichc iavif.vi, vijiei«i(Mi .tiit \u tit 

ITS 
STUNS - fit tki Bittli •< ikici ttlwiii tWi It ttl'i 

STiiia mvt.v (SI), ir.nwcsiso 

ITS 
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OIIE 0004 0031 

ilX 

OIU 000? 0033 
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OIU «I>E 0003 0031 

0020 i70E 
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0021 34tE 0040 
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0032 42tl 

0034 4233 
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0130 S(C« 

0031 0200 0011 
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0040 4E7S 



STRDST8 - CET THE tEU BUFFER STATUS 
F>itaitiill9«t • [icord 

EudtiStii 
FiitSptet 

HiWitir 

lOMVlttI 

InpntDlsttltd 
OstpttDlitbltd 
ItitDilt 
tltSidirAftil 
AltBgfUitdlt 
AllBvlfiiSlli 
tnd; 



Utigtn 
intigtii 
iBtigtii 
inttgtr; 



(ttit 
(tttt 
(trii 
Hint 



filti 

(till 
filsi 

UlK 



D) 
0> 
0) 
0) 



3TRDSTS 



HOVE.V 
MOVE.V 
KOVE.V 
HOVE.W 



RB_SIZE(A4), (A31* 

RB_rREE(A4), (A3)« 

RB_HIVA(Ai), (A3)t 

RB.lOWAlAi), (A3)t 



iitin (0 if AltBgfiitAMil Ulit) 
inligir, (0 if AltBoffiiAfiil filit) 



(It bglfic fiit 

git fri( sptci bTtc coont 

git hi vitir tfti coanl 

git low wttii bftt comt 



git thi (ttgi tad sitt bf t( Fifitl tttliins 

8TST OIHPE.Rl, RB.FlGWUAit iii FORT to BUFFER diubltd! 

BSR.S HAKEBOOl 

BT8T OOUTEJl, RB.FUUHAi) iii BUFFER to USER diSifcUd* 

BSR.S HAKEBOOl 

BCLR 0108T.R2, RB.riC2tt(Ai) >tif >m dtti tiii loit> 

BSR.S HAKEBOOl 

IF htii in Alt tgffir thta litiin it'i ADDRESS AHD SIZE 



BTST 



iAlTBF.Rl. U.FtCUl(At> 



IDSTrom 



RDSTiiit ITS 



BOFF.S 


RDSTioni 


HOVE.S 


01, (A3I« 


HOVE. I 


RB_ABADR(A(I, (A3U 


HOVE.V 


RB_ASIZ((A4), (A3I 


IIA.S 


RDSTiiit 


CtR.B 


(A3)« 


ClR.l 


(A3)» 


CIR.V 


(A3) 



iSit All biffir booli^n 

igtl Altiiiiti bitfii Addrift 

i|tl Altiriili boffit lilt 



iM Altiriiti bsfitt iiiiliblt 
110 Nil (oiittt fet iddtiit 
iind liii b|tt« fiii 



HAKEBOOl - Mki Ftitil botttti (roi iico dig 



HAKEBOOl 



m 


Dl 


ANDl.B 


ITIUE, Dl 


MOVE.B 


Dl, (A3)i 


RTS 





iDI.B < IFF if lilt fUg cliir 
Mail ti Piioil btoltin (I • tritt 
ifitt it fiiiBitti bittk 
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tivisn 
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Fi 
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intmt, 
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IniolOiiablil . 
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lUm • 1. lilii • 0) 
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OitpitDliibiid : 


bill, 


lliii > 1, lilii > 0) 
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AtjtgLillFlid 


bfli; 


Itiii • 1, filii ■ 01 










1713* 






AltlglliiAitil : 


b|U, 


(trii • 1, itlii ■ 0) 










11 M« 






AltBillicAddi : 


poiBtii, 


(« if AllBiifiiAiijl filfil 










l>iS< 






AltliffiiSiii : 


inlitii; 


(t If AltBiffiiAiiil filiil 
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014! 


3iEE 


0014 




17il« STVTST9 


HOVE.W 


VBJIlElAi), (Allt 


ijit 


bilfic liii 


gi4t 


liEE 


OIK 




n«»« 




NOVE.W 


WB.FIEEIAil, (A3)» 


,|il 


fill iptoi b|ti sogDl 


ei4t 


3«EE 


OOOE 
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1771> 
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IFJTVNEAIAII, (All» 


.lit 


uiiiii ngibir of ibtii bit 










17711 


«ll ttt 


lligi lad liti brti Fiicil beiliiii 












1»73» 












9l4t 


OtiE 


OOIS 


Otll 


17741 




rrsT 


IIHPE.VI, VB.FLCUKAil ;ii 


U8EI to BUFFER liiiblii)) 


0134 


iUi 






17781 




ISR.S 


KAREBDOl 






llSi 


OliE 


0014 


OOIS 


H7«i 




BT6T 


lOUTE.Vl, VB.FlCUl(Atl ,ii 


BUFFER ti FORT Iiiibli4> 


tisc 


41D» 






1777« 




BUS 


NAKEBOOL 






ilSE 
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0004 


0117 


11711 




ITST 


IAUtF_«, M.FlCltKA*) ;ii 


Alto liaiFtid utfi tn> 


0U4 


(IDl 






l»7»i 
17I01 




BSR.9 


HAIEIOOl 














17111 
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n AH bill 


■[ thii ritiin il'f ADDIE99 AND SIZE 










l«l}> 












Ilii 


tllE 


D«oi 


OOIS 


17I3« 




ITST 


lALTBF.VI, WI.FlCltllAl) 




eiic 


t70E 






I7III 




I0FF.8 


VTBTlOBi 






lltE 


UFC 
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KOVE.I 
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^iil 


Ait bsfiii beoliii 


0171 


ItEE 
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HOVE.L 
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.|4t 


Altiiiiti biiiii Additii 


1174 


UK 


tilC 




17171 




KOVE.V 
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ei7t 


ilO< 
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BRAS 


UTETiiil 






H7C 
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CIR.I 


<A3)« 
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Altiiiili biffii tiiilibli 


ai7t 
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ClE.l 
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Nil lointii ill iKiiii 


llli 


42S3 
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77J1 




CII.V 
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,lU 


iiri bFlii fill 


till 


4E7S 
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OIti 4ill 

DIA4 BI7A 0I4]» 

IIAI (702 

OlAt 7i01 

OtAC 3iCl . 
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iOOS 

2007 
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2012 
1013 
2014 
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2011 
2017 
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2021 
2022 
2023 
2024 
202S 
lOli 
1017 
1031 
1027 
1030 
1031 
20311 
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1034 

103; 

2031 
1037^ 
1031 

1039' 
1040 
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2043 

2044 
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STBF5TS - RttuiD lo thi g«r In tht piKiitit block Ihi sttti et tbt Biifii Cootiol Tibli. 
PiiiiitetBlock • [fecotd 



BiidRill 


Uttftr, 


{riitgi ■ 0. .1} 


Piiiiy 


iBtigilf 


(iinge » 0. .4) 


DillCoi 


intcQtri 


[iiage « 0. .1) 


VsidSIll 


iDtegeri 


(iinge > 0.1) 


HiidSliakt 


ioltgii; 


(iinge • 0. .91 


end, 







STBFSTS CIR.L 

CET BAUD RATE 

MOVE.W 
HOVE . B 
LEA 
B3R.S 



CET PARlTt 



MOVC.V 
HOVE . e 
LEA 
BSR.3 



IHAIBAUD.DO 
BFJDBDCAitl, Dl 
BAUDCNV,AO 
CETVAl 



IKA2PRTt,D0 
BP.PARKAO, 01 
PRTTCNV.AO 
CETVAl 



^HAKE SURE NO CARBACE IN RECISTEI 



;H«I BAUD RATE PARAMETER VALVE 

i CURRENT TABLE VALVE 

; CONVERT TO IHTECER RANGE 



,NAI PARITI PARAMETER VALUE 

: CURRENT TABLE VALUE 

; CONVERT TO INTEGER RANGE 



CET DATACOK - BASED ON D4 tnd tbi SAVED UNIT NUMBER 



CIR.L 
CHP.V 
BE0.3 
MOVEO 
SBFSitPO MOVE.V 

CET VORD SIZE 

HOVE.B 
MOVE.W 

CET HANDSHARE 



MOVE.W 
MOVE.B 
LEA 



Dl 

UnitPO, D4 
SBESIsPO 
«1, Dl 
Dl, (A3lt 



BF.URDSUi), Dl 
Dl, (A3lt 



•HAIHHDS,DO 

Sr.PROFtKAO.DI 

HNOSCNV.AO 



iifSQU if Port 
Ml Port 0> 

ino, ihoH tf Port 1 
iSiit iiiriiitir 



,MAX HANDSHAKE PARAMETER VALUE 
iCURIENT TABLE VALUE 
;CONVERT TO INTEGER RANGE 



CET PARAMETER VALUE AN PUT IN PARAMETER BLOCK 



CETVAL 



CMP.E 
DBEO 



MOVE.W 
RT8 



OIAO.DO.V), 01 
DO, CETVAl 



DO, (A3l4 



iSEE WHICH CONVERSION VALUE < CURRENT VALUE 
{THE INDEI OF ONE • IS THE PARAMETER VALVE 



{RETURN TO USER IN PAIANtTER ilOCK 



Fill: DRV.DTtCON.TEIT 



Figt 1i 



OICC 


(000 


F7CI 




2047» 
304M 


DoDiflBt 


BRA 


DISINTS 


DISABLE INTERRUPTS 










2049« 


i STOUTRD 
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; STOUTVT 
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BSR.S 
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DoEnbInt 
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; STIHVr - 


- TOCCLE 


INBOUND TRANSMIT DISABLE (USER TO BUFFER) 
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STimT 
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DoDisIot 
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4tEE 


oots 
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08S0 
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tool 
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iiDO 






2013' 
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thin iltiidf iit, lit it cnibli 
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BCHC 


tlHPE.VI, (AO) 


titi toggli it 
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DoEBblBt 
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o;iE osfo ooos 
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un 
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2100 
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2110 
2111 
2112 
2113 

2114 
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EnbRciIn - Enable input rcceiie 

Entrf ; Ki ■ iddiess ol ports data atea 

M c additss oi read bglfec flag 1 Isw b|te 
intttiapts disabltd 



EnbRoIn BTST 
60N.S 
BCLR 



lAlTBFJl, (AOI 
ERUhkpit 
IINPE Rl, (AO) 



;altc[nate buffec availabla* 
lyis then let sHitcii enable RCV 
,K0, enable input 



, lee if should tell sther side not BlfSV 

ERIcblprt BRA ChkFioto 

DisRoIn 

Entry : Ai = address of poets data area 

AO 3 addtess of read buffer flag 1 low byte 
inteiiopts disabled 



BSET 
BOH.S 



ilNFEJl, (AO) 
ORIeiil 



(disable input 

,ii was off then don't go busy again 



j if protocols enabled and NOT Line tfpe protocol then go busr 



BTST 



IPR0TJ2, BF_PflOF(A«) 



SEE IF ANY PROTOCOIS AT ALI--CHECK HI BTT 



BOfF.S 
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iVBCHR - CET NuBbti oi chtiacttts IN tbc WRITE BUFFER 



BVICHR nOVE.V VB_SIZE(Ai), DO 

SUB.V WB.FREEcAil, DO 

HOVE.V DO, (A3I 
RTS 



;9tZE IN Di 

, SIZE - FREE = Nniliir of CHARS 

, icturs to Dsec iioont 



, BRBCHR - CET Nmber of chtcicters IN tbe READ BUFFER 



BRBCHR HOVE.V RB.SIZElAi), DO 

SUB.V RBJREE(A6>, DO 

NOVE.V DO, <A3) 
ITS 



,S1ZE IN Dt 

, SIZE - FREE := Hoibit of CHARS 

, retgtn to osic tioont 
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; STRDAITBF - stt Altecnite Buffic fot Reid 
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DiSIMTS 
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HDABil 




ICA 


RDBUF(Ai), AO 




MOVE.W 


IRBFLCH, DO 




BRA. 5 


RDABok 


RDABsi 


TST.W 


DO 




BFL.S 


RDABok 


STBFert 


MOVED 


IIKVPRM, D7 




BRA.S 


RDABeiit 



disibie inttcrupts 

i|ct iddtets ind site user pisitd 

iddt ok, check sitt 

the; Mere lero so use defiilt 

leid boflei 



check siie, is it nigitiTe' 

no 

jrcs, intilid piiiieter 



; got buffer iddcess ltd length 

RDABok BTST lEKFTJ], RB_FIG2«1(A() i cgttent buffet eaptr? 

BON.S RDABswtch ; res, then use oset's buffer 



; buffet isn't eaptf so Miit till eipt; to switch 

HOVEL AO, RB_ABADR(Ai) 

KOVE.W DO, RB_A9IZE(A() 

LEA RBJLCUKAi), AO 

BSET tALTBF.Rl, (AO) 

BSR OisRciIn 

BRA.S RDABeiit 

i EHFTY SO HAKE NEW the carrent buffer 

RDABswtch BSR.S SetnpRB 

RDABeiit BRA ENBIHTS 



siTe iddtess in lit buffer idr 
ind length in tit buffer site 
DisRcfIn needs AO -> fUg bfte 
ilt buffer ifiilibie true 
disible input ind see if should go bosi 
eiit 



GetNewBuf - froi user's ptreietec block get the Alt buffer 
iddress end site. 
EIIT . DO = lit buffer length 
Dl • 

AO e lit buffet iddtess 
(EQI = use defiult 
(NE) > use AO ind DO 

CetAltBuf HOVEA.L iki)t, AO 

HOVE.W (A3)t, DO 

CLR.l Dl 

CHF.l AO, Dl 
CABFciit RTS 



Fill: DRV.DTACOR.TEn 



Pagi JO 



im (100 F(E2 

OJBi ilFO 

09Bi iiOt 

09BII 11EE aiSC 

0;BE 303C 0100 

09C! (004 

09C4 4A40 

0?C( (BBt 



OKI 0S2E 0001 0017 
09CE ((1( 



0;D0 2D4I 002S 

OfDt 3D49 002C 

09DB 08EE 0003 OOIS 

09DE OlEE 0002 DOIS 

0?E4 (002 



09E( (104 

09Ee (000 F(D2 



09EC 43EE 0011 

09FO 99CC 

09F2 (001 

09F4 43EE 0034 

09FI 49EE OOSC 



09FC 22C8 
09FE 22Ct 
OAOO 22C8 



Ot02 32C0 
0A04 32C0 



; STVTALTBF - set Altecniti Butler foe Wiite 



STVTALTBF 


BSR 


DI5INTS 




ESR.S 


GetAltBof 




BNE.S 


VTABsi 




lEA 


WRTBUFIAO, AO 




MOVE.W 


IVBFLEN, DO 




BRA. 5 


WTABok 


WTABsi 


TST.W 


DO 




BHI.S 


STBFert 



I disible Uteitoiiti 

igel Dset's butfet iddiest ind siii 

, iddr good (hk tin 

, thff Here itio lo use defiolt 

, wtitt batter 



check sue, is it negitifet 
no 



, got battel iddciss end length 

VTABok BT5T IEHFT_V2, WajLG2«l(A() , corcent buttei eiptf? 

BON.S VTABswtch , yes, then use user's butter 

, butter isn't espti so wiit till eapt; to switch 

HOVE.I. AO, V8_ABA0R(A(< ,sife iddress in lit butter idr 

HOVE V DO, VB_AS1ZE(A(I ,iiid lengtb in alt butter sue 

BSET IINFE.WI, WBJLCUKAd .disable input 

B5CT tALTBF.Wl, WBJLCUKAO ,ilt butter aiailable true 

BRA S WTABeiit , eiit 

, EHFTt SO KAKE NEW the cuirent butter 

VTABswtch BSR 3 SetupVB 

WTABeiit BRA ENBIHTS 

, SetupRB - put the alternate butter info in the Read Buttei Control Table 

, SetupVB - put the allernite buffer info in the Write Buffer Control Table 
, Entr; : DO - alternate buffer site 
, AO : alternate buffer address 

SetupVB 



SetupRB 



, lofe the buffet address into the Front, Rear, and buffer pointers 



LEA 

SUBA.L 

BRAS 


WBJlLLPtAO, At 
A4,A4 

STUPgo 


LEA 
lEA 


RBJILLPIAO, At 
RDBUFtAil, A4 



STUPgo 



HOVE.L 


AO, 


(AlU 


HOVE . I 


AO, 


(Al)t 


HOVE . L 


AO, 


(AD* 



;set the till (Front) pointer 
,set the eipt? (Reai) pointer 
;set the buffer pointer 



icie the site into the buffer site and free space counter 



KOVE.V DO, (Al)« 
HOVE.W DO, <A1)4 



;set the sue 

;set the free space aiailabie 



rill DRV DTACOMTEXT 



fiift SI 



OtOl 


B9C8 




OAOI 


uo: 




iMk 


3D7C oms 


004)1 


0A!0 


3D7C OOSO 


004C 


OAli 


U7j 





, see if shciild set witer iicks foi leid bafiei 



CKFA.L 
BNE.S 
HOVE.V 
HOVE.V 
STUPeiit RT5 



AO, A4 

STUPeiif 

IHAIRHI, IIB_HIWA(A() 

IHAIIIL.O, HB LOVA(til 



Fill: DRV.DUCOH.TEIT 



Fige 52 



QAii ii 07 oe 9t OC tc 

OiiE OF 



OAIF 00 01 03 03 0? 



0(24 49 

01123 09 

0A2i 31 

Ot27 11 

0A2I a 

Ot29 21 

0A2II 02 

0A2B 04 

0A2C 10 

0A2D 00 



conitint dtti icti 

Conftciioii ictiTS foe Set lunctions gf Unitstitos 

BAUOCNV DATA.B i,7,l, U, SC,U,iF , BAUD RATE 

, i>300,7-iOO,l<1200,A<2400,CM«00,E>9iOO,F=t9200 

fRTKKV DATA.B 0,1,3,5,7 .PARITY 

; 0:DISAB[,ED,UODD,3>EVEN,3-HARI ilHIT/NO RCV,7>SFACE SHlT/NO RCV 

HNDSCNV DATA.B S49 ,LINE/CTSnNV 

LINE/CTS/NOT INV 

LINE/DSR/INV 

LINE/DSR/NOT IKV 

LINE/DCD/IKV 

LINEfDCDfNOT IHV 

ZONflOFF 

ENQ/ACI 

ETI/ACK 

NONE OF THE ABOVE PROTOCOLS 

;SBBBSSSIBlSSSiaSBBESSBS3aBIBSBBa««««CBBaSS3SSBSS3RXSBBSICSZB«IBBBSB«XllBS«SSeSSrSSSSXSXE«; 



DATA.B 




DATA.B 




DATA.B 




DATA.B 




DATA.B 




DATA.B 




DATA.B 




DATA ! 




DATA.B 




DATA B 





FiU, DRV DTAC0M.7EIT 



Fi^e S3 







2270 












2271 


> , Viiiibli 


diti irti 








2273 












2273 


, Fott < 


iti arei 








2274 








0A2E 




2275 
2271 


FoilODiti 










2277 


' , DEFAULT 


BUFFER Cod 


[ol Tible - MUST HAVE 






2278 


^ , 








00000000 


2279 


DEF8WRT 


EOU 


%-Poit002ti 


0A2E 


OE 


2200 




DATA.B 


at 




00000001 


22S1 


DEFERD 


EGU 


t-FortODiti 


1A2F 


OE 


2262 




DATA . B 


$0E 




00090002 


22S3 


DEFPART 


EQU 


*-PottODjtj 


DA3t 


00 


2284 




DATA.B 


iOO 




00000013 


2285 


DEFVRDS 


EQU 


%-FortODiti 


0k3l 


00 


2286 




DATA.B 


kOO 




00000004 


2287 


DEFETVHEA 


EQU 


%-FoctODiti 


0A32 


0050 


2281 




DATA.W 


80 




OOOOOOOi 


2289 


« OEFINTRH 


EQU 


»-PiirlODitj 


DA34 


0000 


2290 




DATA.W 


ilODO 




0OO0OCI6 


2291 


DEFFROT 


EQU 


*-Por(0Dit4 


0A31 


0902 


22*2 




DATA.W 


S0902 




OOOOODOA 


2293 


DEFend 


EOU 


«-FoilODiti 




ODDOCOOS 


2294 
2295 


OEFBCTLN 


EQU 


(DEFenil-DEFBWRT)/2 






229i 


, BUFFER CONTROL TABLE 








2297 


, 








OOOOOOOA 


2298 


BFRCTL 


EQU 


t-FoitODiti 




OOOOOOOA 


2299 


6r_WRBD 


EQU 


%-FoitOD>ti 


IIA38 


00 


2300 




DATA.B 






OOOOOOOB 


2301 


fiFJDBD 


EQU 


*-FortOD4l4 


IIA3? 


00 


3302 




DATA.B 






OODOOOOC 


2303 


BF.FART 


EQU 


%-FortODaU 


DA3A 


00 


2304 




DATA.B 






OOOOOOOD 


2305 


BF.WRDS 


EQU 


t-PottODita 


3A3B 


00 


230i 




DATA.B 






OOOODOOE 


2307< 


BF_BTWNEA 


EQU 


%-PortODiti 


0A3C 


0000 


2308< 




DATA.W 






00000010 


2309 


BF_INTL 


EQU 


l-PoitODiti 


CA3E 


0000 


2310< 




DATA.W 






00000012 


2311< 


BF.PROF 


EQU 


*-PotlOData 


0A4D 


0000 


23121 
2313' 




DATA.W 








2314< 


; 


WRITE BUFFER CONTROL TABLE 






2315 


; 








OOOODOH 


23U 


VRTCTL 


EQU 


»-PottOD4la 




00000014 


2317 


WB_FLG1 


EQU 


*-PotlOData 


0A42 


0000 


2318< 




DATA.W 







OOOOODH 


2319 


WBJLGZ 


EQU 


t-PortOData 


0A14 


0000 


2320 




DATA.W 







OOOOOOlt 


2321 


WBJILIF 


EQU 


t-FoctOData 


0A4( 


00000000 


2322 




DATA.t 







OOOOOOIC 


2323 


WB_EKPTV 


EQU 


*-PoctOData 



SAKE FIELD FORMAT AS BUFFER CONTROL TABLE 

.WRITE BAUD RATE-9»00 

iREAD BAUD RAT£-9i00 

.PARITY-DISABLED 

,WORD SIZE = 8 BITS (U7 BITS) 
.NUMBER OF CHARS BETWEEN 
ENQ's 0[ ETt's 

INTERNAL FLAC-aU off 

.PROTOCOL FLAC--Enabled - lON/XOFF 

.nu>be[ ci words in both tables 



Indei to Bgffoc Control Table 

Indei to WRITE BAUD RATE 

Indei to READ BAUD RATE 

Indei to PARITY 

Indei to WORD SIZE 

Indei to NUMBER OF CHARS BETWEEN 

ENQ's or ETI's 

Indei to INTERNAL FLAGS 

Indei to PROTOCOL FLAGS-HAKDSHAKE TTFE 



; Indei to WRITE BUFFER CONTROL TABLE 

i Indei to FLAG WORD 1 

; Indei to FLAG WORD ] 

; Indei to BUFFER FILL POINTER rear 

; Indei to BUFFER EHFTV POINTER front 



file DRV DTACOn.TElT 



Fiji 51 



tA4t ODOOOOOO 

OOOOtilt 
tA4E 00000000 

00000014 
0A31 0009 

OOOOOOli 
OAS* 0000 

OOOOOOi) 
OASi OODOOtOO 

OOOOOOiC 
0A3A 0000 

OOOtOOlE 

OASC 0000 





00000030 




00000030 




0010 




0000003! 




0000 




00000034 




oooooiot 




00000031 




oooootoo 




0000003C 




00000000 




01000040 




0000 




0000004! 




0000 




00000044 




ootoooto 




00000041 




0000 




00O00O4A 




oooo 




0000004C 




0000 



I1000004E 
DA7i: OOOOOOOO 

OOOOOOi! 
OAlt 00000001 

aoooooii 

0AB4 0000 

OOOOOOSI 
OAlt OOOOOOOO 





BATA.t 




UI.BADR 


EQU 


%-F<iltODlt4 




DATA.L 




WB_SIZE 


EQU 


«-FottODlli 




CATA.V 




WBJREE 


EOU 


t-ForlOOOi 




DATA V 




V8.ABADR 


EOU 


»-FortODiH 




DATA.L 




VBJSIZE 


EGU 


%-FoitODitl 




OATA.W 




VBJENQ 


EQU 


«-ForlODiti 




SATA.W 




. 


READ BUEFER CONTROl TABLE 


RDCTl 


EQU 


l-Fo[IODitl 


SB.FICI 


EQU 


t-PoitODltl 




OATA.W 




IIB.tlC! 


EQU 


%-Poi(ODiU 




OATA.W 




ujnit 


EQU ' 


»-PoitOO«ti 




DATA.L 




BBJHPTK 


EQU 
DATA.L 


l-PorlOOitl 


IB.BADB 


EQU 


t-FotlODlti 




DATA L 




R8.S1ZE 


EQU 


t-Po[tODiti 




DATA W 




RBJREE 


EQU 


l-PmlODlti 




OATA.W 




BB_ABAD8 


EQU 
DATA.L 


%-P(i[tOOiti 


RB.ASIZE 


EOU 
OATA.W 


t-PoflOOitt 


RB.KIWA 


EOU 


Ih-FottODiU 




OATA.W 




RB_10WA 


EQU 


%-P(i[10Diti 




OATA.W 





contiol chiEictti bnffti 

l-PultOOlU 



CB.ERONT EQU 

DATA.L 
CBJEAR EQU 

DATA . L 
CB.tlACS EQU 

DATA.W 
CTLBUr EQU 

DATA L 



%-Pl>rtOOlU 



1-PotlODiU 

9 

«-PotlODitl 



, Rlld Bulfii - 2S1 b|tts 

RDBUr EQU t-FoEt03ltl 



.Indei to BUFFER ADDRESS 

,Udii to BUFFER SIZE 

,Inilii to AHOUNT OF BUFFER FREE SPACE 

,ln(f(i to ALTERNATE BUFFER ADDRESS 

,lndci to ALTERNATE BUFFER SIZE 

.Indei to Nuibfi of bftis biloii wiit for A 



,lndii to READ BUFFER CONTROL TABLE 

,lld(i to FLAC WORD 1 

,Indci to FLAC WORD ! 

.Ildei to BUFFER FILL POINTER [HE 

.Indei to BUFFER EKFTI POINTER front 

,Ind(l to BUFFER ADDRESS 

.Indti to BUFFER SIZE 

,Udii to AHOUNT OF BUFFER FREE SPACE 

,Ind(i to ALTERNATE BUFFER ADDRESS 

,Indei to ALTERNATE BUFFER SIZE 

,Indei to NUHBER OF BVTES IN HI WATER HARK 
.aunbei of bftts io buffor when at lii Mitcr 

,!ndii to NUHBER OF BVTES IN LOW WATER HARK 
.na«b«i of bytts in bnfftr when it low Mite 



ilndii to Ctl baffoE Front PotntOE 

, Indti to Cti bofftr Reir Fomttr 

.Indei to Ctl boffoE Flitjs woEd 

,Ind(i to Ctl boftcE 

,lndei to Read BaffOE 



FiU: 


DRV.DTACOMTEIT 


otu 


DOOOOOOO 


OtlE 


00000000 


0A92 


00000000 


oxn 


00000000 


OAU 


00000000 


0A9£ 


00000000 


DAt: 


00000000 


OAAi 


00000000 


OAAA 


DOOOOOOO 


OAAE 


00000000 


mi 


DOOOOOOO 


OABi 


ooooooog 


SABA 


DOOOOOOO 


OABE 


ooooooog 


0AC2 


00000000 


OACi 


00000000 


lACA 


00000000 


OACE 


00000000 


0AD2 


DOOOOOOO 


OADi 


DOOOOOOO 


DADA 


DOOOOOOO 


OADE 


ODOOODOO 


OAEl 


DOOOOOOO 


OAEi 


ODOOODOO 


OAEA 


DOOOOOOO 


OAEE 


OODOOOOO 


OAF! 


00000000 


OAFi 


ODOOODOO 


OAFA 


DOOOOOOO 


SAFE 


DOOOOOOO 


0B02 


DOOOOOOO 


OBOi 


DOOOOOOO 


SBOA 


OOODDODO 


OBOE 


OODOOOOO 


OBli 


OODOOOOO 


OBU 


OODOOOOO 


OBU 


OODOOOOO 


OBIE 


ooooooog 


0B22 


OOOOOODD 


0B2i 


DOOOOOOO 


0B2A 


ODOODDOD 


0B2E 


OODOOOOO 


0B32 


OODOOOOO 


0B3i 


OODOOOOO 


0B3A 


DOOOOOOO 


0B3E 


DOOOOOOO 


0B42 


OODOOOOO 


0B4( 


DOOOOOOO 


9B4A 


OODOOOOO 


0B4E 


DOOOOOOO 


eB;2 


OOOOODOO 


OBSi 


DODOOODO 


OBSA 


DOOOOOOO 


OBSE 


ODOOODOO 



Fige SS 
2378' DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ,H 



237»« DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ,12! 



2380* DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 



23il< DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 



Flit 


DRV DTXCOH TEIT 


DB62 


DODOOODO 


OBt> 


00000000 


OBiA 


00000000 


9BiE 


OOOCOOOO 


IVl 


OOOOODOl 


CETi 


OOOOOIOO 


D!7» 


03000COO 


OBIE 


OOC00090 


088: 


00000000 


0B8i 


00000000 




0000013C 




COOCOIOO 



Piqt Si 





0CO0O15C 


OBIk 


OOOOGDOO 


OBOE 


90000000 


0B92 


00000030 


OBn 


OOOOOGOO 


OBfk 


COOOOOOO 


mi 


oooosooo 


3EA2 


COOOOOOO 


OBAi 


OOOODOOO 


OBAA 


oaoDOOOo 


CEAE 


90000000 


OBBi 


soooocoo 


OSEi 


OCOOOIOO 


OBBA 


00000000 


OBBE 


oooooooo 


OBCZ 


00000000 


OECt 


COOOOOOO 


OBCA 


oooooooo 


OBCE 


OOOOOOOO 


obd: 


JGOOOOOO 


OBSt 


OOOOOOOO 


OBDA 


30000000 


OBDE 


oooooooo 


OBE! 


oooooooo 


0B£( 


OOOCOOOO 


OBEA 


oooooooo 


OBEE 


OOOOOOOO 


obf: 


oooooooo 


OBEi 


OOOOOOOO 


OEFA 


oooooooo 


OBFE 


OOOOOOOO 


oco: 


oooooooo 


OCOi 


OOOOOOOO 


OCOA 


oooooooo 


OCOE 


COOOOOOO 


0C12 


oooooooo 


OCK 


OOOOOOOO 


OCIA 


oooooooo 


OCIE 


OOOODOOO 



2382< REFcnd 


EQU %-Fc[tOD<ti 


23B3« RBELEN 


EQU EBFend-RDBUF 


2384> , 




:3IS> , Vntt 


Butfit - in bftes 


238«* , 




:3!7' VRTBUF 


EQU «-Po[tOOiti 


238e« 


DATA L 0,0,0,0,0,0, 



,READ BUFFER LENGTH 



;Udei to Wiitt Buffec 
3,0,0 ;i4 



238'> DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ;lZa 



239C< DATA.L 0,0,0,0,0,0,0,0,0,0,0,0,0,0,9,0 



Fill 


DRV.DTACOH.TEJT 








OCJl 


OODOSOOO 








OCU 


000000110 








izn 


DOOODOOO 








0C2E 


00000000 








0C32 


00000000 








0C3i 


00000000 








0C3A 


00000000 








0C3E 


00000000 








aC42 


00000000 








0C4i 


00000000 








0C4k 


00000000 


23n« 


un.i 


0,0,0,0,0,0,0 


0C4E 


00000000 








0CS2 


ODOOOOOO 








OCSi 


oooDooog 








0C3k 


oooooooo 








OCSE 


00000000 








0Ci2 


oooooooo 








OCii 


oooooooo 








KU 


oooooooo 








OCiE 


oooooooo 








ten 


oooooooo 








0C74 


oooooooo 








0C7» 


oooooooo 








IIC7E 


oooooooo 








0C82 


oooooooo 








OCSi 


oooooooo 










0000023C 


2392« WBrend 


CQU 


t-PortODlti 




00000100 


2393* VBfLEN 
J394« , 


EQU 


UBFend-WRTBUF 




000002SC 


2395» pdlen 


CQU 


%-FoitODiti 



Fige 57 



0,0,0,0,0,0,0,0,0 



iWHITE BUFFER LENGTH 

, Length of poit diti nm 



rile 


DRV DTHCOH TEXT 












n?7« 










!3?J" 










!39?« 










HOC* 


OC!* 






• 


2401< 
2401« 
!403< 
2401' 


OCIk 


OC 






2105' 


OCSE 


OC 






2106« 


0C8C 


00 






:i07« 


DCID 


OD 






210«« 


OCJE 


0050 






210?< 


3C90 


0000 






2410« 


OCW 


0911 






2411' 
2412« 


CCH 


OC OC 


00 CO 




2413" 


0C9I 


0000 


0000 


0000 


2414" 
2415« 


OCSE 


00000000 




241i> 


3C»I 


00000000 






OC(i 


00000000 






KH 


00000000 






OCAE 


0000 


0000 


0000 


2417« 


0CB4 


0000 


0000 




241i> 


OCBl 


cooocooo 




241?' 


OCBC 


00000000 






OCCO 


00000000 






0CC4 


00000009 






OCCI 


0000 


oooo 


0000 


2420« 


OCCE 


0000 


0000 


0000 




OCDI 


0000 


0000 







Fiqc 51 



0CD8 


00000000 


OCDC 


00000000 


OCEO 


0000 


0CE2 


00000000 


OCEi 


00000000 


OCEt 


00000000 


OCCE 


00000000 


ocr2 


OOODDOOO 


OCFi 


00000000 


OCF* 


00000000 


OCFE 


00000000 


0DO2 


00000000 


OOOi 


00000000 


ODOt 


oooooooo 


OOOE 


00000000 


0D12 


oooooooo 


OOli 


oooooooo 



, Fort 1 diti 3tti 

, Silt stiuclort is the poit diti 4Cei 

PottlDili 

, DEFAULT BUFFCI! Contcol TibU 



DJTA.B 


SOC 


OATA.B 


$0C 


DATA.B 


(00 


DATA . B 


SOO 


OATA.W 


00 


DATA.W 


SDO 


OATA.W 


S0!11 


DATA.B 


0,0,0,0 


DATA.W 


0,0,0 



DATA.: 



DATA W 



DATA.L 



DATA.W 



0,0,0,0 



0,0,0,0,0 



0,0,0,0 



0,0,0,0,0,0,0,0 



, WRITE BAl/D ilATE-4iO0 

illEAD BAUD RATE-4800 

iFAHITt-DISABLEO 

.WORD SIZE - 8 BITS (U7 BITS) 

, NUMBER OF CHARS BCTVEEH ENQ's o[ ETI's 

.INTERNAL FLAG--iii off 

.PROTOCOL FLAO-EnibUdaiNE/DSR/NOT INV 

, buffer control ttble 



write buffet control table 



teid boffer control tible 



2421' 

2422' , control chiricter buffet ind control fitiibles 

2423* ; 

2424' DATA L 0,0 

2425* DATA.W 

242t< DATA.L 

2427' , 

242t> DATA.L 0,0,0,0,0,9,0,0,0,0,0,0,0,0,0,0 



■,n 



File. 


OHV DTACOM TEIT 


ODIA 


00000000 


ODIE 


00000000 


SD22 


OOODOOOO 


0026 


OOOOOOOO 


CD2A 


00000090 


OGU 


OOOOOOOO 


0D3: 


OOOOOOOO 


0D3i 


OOOOOOOO 


0D3A 


00000009 


0D3E 


OOOOOOOO 


9D4: 


OOOOOOOO 


ID4i 


OOOOOOOO 


0D4A 


OOOOOOOO 


0D4E 


OOOOOOOO 


ODSZ 


09000800 
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VRFllLl 


0000002S 


lONIOFF 


OOOOOOOI 


SVURCAD 


00000004 


UNITPO 


OOOECIt 


VIDDEFIT 00000003 


VRFUL2 


0000992i 


niolo 


000007 


SVU5TAT 


0000)0t4 


UNITPl 


0«OEEt« 


VIDSET 


09O9OD97 


URFU13 


00900027 






SVIWRITE 


00000000 


UNMCND 


OOOOOOOi 


VBFEND 


000002SC 


WRF1LL4 


09000021 






5VVAID1R 


00000014 


UPCISAIF 


90033C« 


VBFIEN 


00009100 


WRCRORCI 


0009901C 







tirois 24Ji lints. Fill DRV.DTACON.TEIT 



NOTE 

THE FOLLOWING EXAMPLE IS A LISTING OF THE PRINT 
WINDOW PROGRAM USED FOR DOING A SCREEN DUMP FROM 
A TEMPORARY WINDOW. 



VSIXRF -- Cross Keferenuu L i ai t i n a 
File ID , PHTWND .TEXT 



N o V « in b u 1. Z . 



8 . 

9 . 
iO . 

11 . 

12 . 

13 . 

14 . 
i U . 

16 . 

17 , 

18 . 

19 . 

20 . 

21 . 

22 . 

23 . 

24 . 

25 . 

26 . 

27 . 

28 . 

29 . 

30 . 

31 . 

32 . 

33 . 

34 . 

35 . 

36 . 

37 . 

38 . 

39 . 

40 . 

41 . 

42 . 

43 . 

44 . 

45 . 

46 . 

47 . 

48 . 

49 . 

50 . 

51 . 

52 . 



PHTWND, TEKT - 
FRTWND 



Print Current Window 



<c> Copyright 1982 Corvus Systems, inc. 
San J o Si ti , CAlifornid 

All Rights Reserved 

V 1.0 07-01-82 KML Otiyinal progiiii £oi HXlOO piinlei 

V 1.1 10-01-82 LEF Added IDE 460 pcinler sutipoil 



PROGRAM pr twnd , 

USES CSU /CCUTI L/ CCL IBl CCdeln, CCwndIO, 

CONST esu ■= 27 , 

TyPE prtrid = (NONE, IDS, MX 100), 

VAR prtype; prtrid; 

prtr: integer; 

diKp: integer; 

i,atgn. integer, 

GurWnd; pWndRcd; 

pUev ; pS t r ingSO , 

{•CCLIB extern ill definitions 1 

FUNCTION pOSourWnd: pWndRod, C get kybd reuocd pointer i 

FUNCTION pOSdevNam <n; integer): pStcingSO, 

FUNCTION OSdispDv; integer; C get display unit nmbr i 

PROCEDURE Rbytes (x,v, count, integer, pElut£: pliytus/; 
const RDBYTES =7, 
var wbu £ . record 

byteoount; integer, 

buffpti. pBytes; 

end , 
begin 
1 f y < t hen begin 

pBu££ACO] := 0; exit (Rbytes), end, 
write ('VlBo', chr(x div 236), chr(x mod 'i\J6 > , 

chrCy div 256), chr(y laod Z56), chr^,^) 
wbuf.bytecount :■ count; 
wbuf.buffptr : ^ pBu£l; 
unitctatus < d 1 sp , wbu f , RDBVTES ) ; 
• nd ; 

C$P) 



EXTERI-IAL , 
EXTERiJAi, , 
r;XTERNAL. , 



VSIXRF -■ 

File ID : 



Cross Rctacanca Listing 
PRTWND TEXT 



No vsmba r 



20 , 1 vez 

Pay* Z 



53 . 

54 . 

55 . 
56 
57 
58 . 
5? . 
60 

6 1 . 
62 
63 . 
64 

65 . 

66 . 
67 
68 . 
69 
70 . 

7 1 

72 . 

73 . 

74 . 

75 . 

76 . 

77 . 
78 
79 . 

no . 

81 

82 . 

83 . 

84 . 
8S 
86 
87 
88 

89 . 

90 . 

91 . 

92 . 

93 . 
94 

95 , 

96 . 

97 . 



PROCEDURE spit (b. byts); 

begin unitwrite i6, b, 



I . , 1 ) 



end ; 



PROCEDURE doit 
vir i , i , I 

cell 



,y: integer; b. byte, 
array C0.6:i of byte, 



FUNCTION bit <i,]; integer), integer^ 



VAC t> 
begin 
b : > 
1 f b 
G afce 

1 
2 
3 
4 
5 
6 
7 
end 
end ; 



integer, 

eel U i ] , 
tlien 
of 



i ( 
i t 
if 
i f 
if 
i f 
1 f 
if 



odd 
odd 
odd 
odd 
odd 
odd 
odd 
odd 



bi t 
b ; " 

(b 
(b 
<b 
(b 
(b 
(b 
(b 
(b) 



- ; 
b + 256 i 



d i V 
d i V 
d i V 
di V 
d i V 
d i V 
di V 



128) 
64 ) 
3 2 ) 
16 ) 

a ) 

4 ) 
Z) 



t hen 
then 
then 
then 
then 
than 
then 
then 



bi t 
bit 
bi t 
bi t 
bi t 
bi t 
bi t 
bi t 



begin 

write ('\lBb'), C CURSOR OFF } 

with curWndA do begin 

C SET LINE SPACING TO 8 DOTS ) 

if prtype • MXiOO then begin 

spit (esc), spit (ord('A'))i spit <S)i end; 
if prtypa • IDS then begin 

spit ( 3 ) , end ; 

C PRINT LEFT WINDOW BORDER ) 

if prtype • 11X100 then begin 

spit <*so); spit <oid('K')); 

spit ((Ingthy+Z) mod 256); 

spit <<lngthy+2> div 236), 

for y :• to lngthy+1 do spit (1); 

end ; 



VSIXRF -- Croas Rcfaranot Listing 
Fll» ID: PRTWND.TBXT 



Novambar 20, 1?82 
Faga 3 



»8 . 
»? . 

100 . 

101 . 

102 . 

103 . 

104 . 

105 . 
lOi . 
107 . 
lOS . 
lOV 
110 . 
111. 
112 . 
113. 
114. 
115. 
116 . 
117. 
116. 
119. 

120 . 

121 . 

122 . 

123 . 

124 . 

125 . 

126 . 
127. 

128 . 

129 . 

130 . 

131 . 

132 . 

133 . 

134 . 

135 . 
13i . 
137 . 
138. 
139 . 
140. 

141 . 

142 . 

143 . 

144 . 

145 . 
14«. 



{ PRINT WINDOW } 



It 



pt typa 
(oc ■ : > 
■ pit 
aplt 
aplt 
aplt 
spit 
(or 



MXlOO than 
to Ingthi dtv 8 do bagln 
<13> j aplt <10) i 
(aao> ; aplt (ard( 'K' > > ; 
< ( lnothy+2> mod 256) ; 
< ( Ingthy + 2> dlv 25i) ; 
(-l>i { BOTTOM WINDOW BORDER } 
:■ to lngthy-1 do bagln 
1 , ab> ; 



Rbytaa (i*8, y, 
aplt (b ) ; 
and i 
apit (-1); ( TOP WINDOW BORDER > 
and ; 
if prtypa • IDS than bagln 
y : • Ing t hy- 1 i 
I apaa t 

foe I :• to Ingthx dlv 8 do bagln 
for 1 :aO to 6 do 

Rbytas <z*8, y-i, 1. SoallCl]); 



for 



to 7 
bit (6 



If b 
apl t 
and i 



bit 
bit 
bit 
bit 
bit 
bit 
- 3 
(b) i 



do 
, J> 
,3) 
, J) 
, J> 
, J) 
, J> 
, J) 



bag in 

* 64 i 

* 32 -t 
« 14 4 

* 8 4 

* 4 4 

* 2 4 



than spit <3) 



and i 
spit <3> i 

y ;• y-''; 

until y < 



spit ( 14 ) , 



and ; 



( PRINT RIGHT WINDOW BORDER > 

if prtypa • MXlOO than bagln 
apit (13> ; spit <10> ; 
spit <aao); apit (ord('K'>>i 
spit ((lngthy+2) Bod 2S6>i 
spit <<lngthy4-2> div 254>i 
for y :• to Ingthy4'l do spit 



<-128> , 



and ; 



(IP) 



VSIXRF -- Crosi Rafaranoa Listing Novambar ZO, l?ez 

Flla ID^ FRTWND.TEXT Faga 4 

147. C NORMALIZE FH INTER ) 

146 . 

14?. II pitypa - HXlOO than bagin 

150 . spl t < 13) i apl t < 10) ; 

151. aplt (asa)i aptt < or d ( ' 2 ' ) ) ; apit <lZ)i 
ISZ. and; 

153. if prtypa ■ IDS than bagin 

154 . spit (3) ) api t < Z> i and; 

155. and; 

ISi. wtlta <'\lBa'); < CURSOR ON } 

157. and; 

151 . 

15?. 

iiO . bag in 

1«1 . CCwndlOini t ; 

162 . prt I : « 6 ; 

163. disp :- OSdispDv; 

164. ourWnd :• pOSourWnd; 

165. pDav :■ pDSdavNan (prtc); 

166. if pDavA <> 'PRINTER' than bagin 

167. wrltaln ('Fiintar dcivat not loadad ....', ohr ( 7 )) , 
1 6S . ax i t (pr twnd) ; 

16? . and ; 

170. prtypa :>KX100; 

171. if argo <> than bagin 

172. prtypa :- NONE; 

173. for argn : ' 1 to argo do bagin 

174. for 1 :a 1 to langth(argvCargn]A) do 

175. If ar gvCargn]A|: i ] in C'a'..'s'] than 

176. ar gv Car gn]AC i ] :• ohr ( or d < ar gv C ar gnlAC i ] ) 

177. -ord< ' a ' ) +or d < ' A ' ) ) ; 

178. if argv[argn:A . 'IDS' than prtypa :■ IDS; 
17?. if argvCargnlA . 'MXlOO' than prtypa ;- MXlOO; 
leo . and ; 

181. and ; 

182. if prtypa <> NONE 

183. than doit 

184. alsa writain <'Invalid printar typa spaoifiad ....', chr ( 7 )> ; 

185 . and . 

186 . 

187 . 

188 . 



VSIXRF -- CrosB Rafaianoa Listing Novambar 20, 1982 

Fil. ID; PRTWND.TEXT p»g, 5 

43 44 54 S8 63 64 6& 94 101 107 116 
117 119 124 133 143 171 

1 54 a 47 6S 69 70 71 72 73 94 106 
107 lOS 111 114 Its 12s 143 173 174 

10 102 139 ISO 

12 1 S 1 

12s 66 143 

13 102 139 ISO 

14 131 

16 69 122 

2 46 68 72 92 93 104 105 124 125 141 142 
154 

256 45 46 64 92 93 104 .105 141 142 

27 19 

3 69 86 123 127 131 154 
32 68 121 

4 70 71 122 124 

5 71121 

6 54 58 72 117 120 162 
64 67 120 

7 37 73 119 132 167 184 

8 70 84 101 108 116 118 123 
ARGC 171 173 

ARGN 26 173 174 175 176 178 179 

ARCV 174 175 176 178 179 

B S3 34 57 61 63 64 66 67 68 69 70 

71 72 73 108 109 120 127 128 

BIT 60 63 66 67 68 69 70 71 72 73 120 

121 122 123 124 125 126 

BUFFPTR 40 48 

BYTE 53 57 58 

BYTECOUNT 39 47 

CCDEFN 17 

CCWNDIO 17 
CCWNDIOINI 161 

CELL 58 63 118 

CHR 4S 46 167 176 164 

COUNT 3 6 4 7 

CURWND 2 7 7 9 164 

DISP 25 49 163 

DIV 45 46 66 67 68 69 70 71 72 93 101 

105 116 142 

DOIT 56 183 

EBC 19 84 91 103 140 151 

i 26 57 60 63 117 116 174 175 176 

IDS 21 63 113 153 178 

J 57 60 65 119 120 121 122 123 124 125 126 

LENGTH 174 

LNGTHX 10 1 116 

LNCTHY 92 93 94 104 105 107 114 141 142 143 

MOO 45 46 92 104 141 

MX 100 21 83 90 100 138 149 170 179 

N 33 

NONE 2 1 172 182 



VSIXRF -- Crota Rafcrano* Liatlng Novambar 20, 1V82 

Flla ID: FRTVND.TEXT Paga i 

ODD 66 67 68 «9 70 71 72 73 

ORD B4 91 103 140 ISl 17« 177 

OSDIBFDV 34 1«3 

PBUFF 3i 44 48 

FBYTE& 36 40 

FDEV 28 16S 1«6 

POSCURWND 3 2 164 

POSDEVNAM 3 3 16S 

PRTR 2 4 162 165 

PRTRID 21 2 3 

FRTWND IS 168 

PRTVPE 23 83 83 ?0 100 113 138 149 133 170 172 

178 179 182 

P8TRINC80 28 33 

PWKDRCD 2 7 3 2 

RBYTES 36 44 108 118 

RDBYTES 37 49 

SPIT S3 84 86 91 92 93 94 102 103 104 103 

106 109 111 127 128 131 139 140 141 142 143 

ISO 131 134 
UNITSTkTUS 4 9 
UNITWRITE 34 

WBUF 38 47 48 49 

X 36 43 57 101 108 116 118 

y 36 43 46 57 94 107 108 114 118 132 133 

143 



NOTE 

THE FOLLOWING PAGES CONTAIN THE CORVUS CONCEPT 
KEYBOARD TRANSLATION TABLES. 



Table of Contents 
KEYBOARD TRANSLATION TABLES 



1. Overview 

2. O The Keyboard and the Keijcodes 

3.0 Translation Tables 

3. 1 SHIFT TABLE (STABLE) 

3.2 REGULAR TABLE (RLTABLE) 

3.3 ESCAPE # SEQUENCE TABLE (ETABLE) 

3. 4 STANDARD MULTIPLE CHARACTER SEQUENCE TABLE <SMTABLE) 

3. 5 CAPS LOCK & QUALIFIER FLAG TABLE (CQTABLE) 

3.6 RELEASE TABLE (RTABLE) 

3.7 BREAK KEY CODE TABLE <BKEYCOD) 

4.0 Translation Table examples 

4.1 Alphabetic character example 

4.2 Standard character example 
4. 3 Escape # character example 

5.0 Default Keyboard Translation Table 

6.0 Program CSK. REV4. TEXT listing 

7.0 Program CSK. DANSK. TEXT listing 

8.0 Program CSK. GRMN. TEXT listing 



- 1 - 



- ii - 



1. Overvieu) 




2.0 The Keyboard and Keycodes 

The keyboard is connected to the computer by a transmission line. 
Through the line; the keyboard sends keycodes describing ujhich 
key has been pressed or released. These keycodes in conjunction 
with the Translation Tables are used to generate the character 
sequences produced by the keyboard driver. Some keys/ like the 
Shift key/ affect which characters are generated when other keys 
are pressed. Some keys cause character sequences to be 
generated. What happens when a key is pressed or release is 
determined by the Translation Tables. 



Keycodes are 8 bits of data< a byte/ s 
inform as to which key has been affect 
pressed (closure) or released. Every 
generates 2 keycodes. which differ onl 
bit (MSB) of the keycode byte. If the 
the closure. If the MSB is clear (0) 
The actual character sequence used for 
released/ is determined by decoding th 
Translation Tables. The keyboard was 
keycodes instead of character sequence 
flexible. By changing the Translation 
the keyboard character set. 



ent by the keyboard to 
ed and whether it has been 
key on the Concept keyboard 
y by the most significant 

MSB is set (1) then it is 
then it is the release. 

a key/ whether pressed or 
e keycodes using the 
designed to generate 
s which makes the keyboisrd 

Tables/ one can alter 



In order to build the Translation Tables a Keycode map is needed. 
This map shows the keycode values for every key on the keyboard. 
Figure 1 is a Keycode Map for the current keyboard (Version 04/ 
Selectric (R) style keyboard). Normally/ the key caps show which 
character is generated for each keycode transmitted to the 
keyboard driver. Figure 2 is a key cap map for this same 
keyboard. 

Version 04 keyboard key caps have either 1 or 2 symbols on them. 
A single symbol key cap specifies that the character is the same 
when it is either shifted or unshifted/ except for the alphabet 
characters which get lower case if unshifted. Key caps with two 
symbols have the character for the lower symbol when unshifted 
and the character for the upper symbol when shifted. 
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20 


21 


22 


23 


24 




58 


59 


5A 


5B 


5C 


5D 


5E 


5F 


1 38 


39 


30 


31 


28 


29 


40 


41 


50 


51 


18 


IB 


10 


13 


16 


08 


OB 


00 


03 


3A 


3B 


32 


33 


2A 


2B 


42 


43 


52 


53 1A 


ID 


12 


15| 




OA 


OD 


02 


05 


3C 


3D 


34 


35 


2C 


2D 


44 


45 


54 


55 


1C 


IE 


14 


OC 


OE 


04 


06 


3E 


3F 


36 


37 


2E 


2F 


46 


47 


56 


57 


19 


IF 


09 


OF 


01 


07 - 


48 


49 


4A 


4B 


4C 


4D 


4E 


4F 



01 

t- 
3 



Keycode Map (release code) 



*♦ 



CORVUS SYSTEMS 



7K 



F1 



€ 



7K 



^ 



TTv 



F2 



TT 



71^ 



Q 



CAPS 
LOCK 



tt; 



TTv 



F3 



W 



^ 



/Tv 



^ 



TTs 



~~7 ( /tT^ /k 

2 3 l4_ 5 






TTv 



lifii: 



TTv 



^ 



7t\ 



^ 



^ 



tt; 



7K 



i±i. 



k- 



il^Tv 



iki 



2^iC. 



TTv 



;sj^ 



F6 



:^ 



7f\ 



■:Ji 



7f\ 



7f\ 



tt; 



u 



7f\ 



^ 



TTv 



:jd 



\/ 



vTs 



F7 



i^ 



TTs 



TTv 



O 



■1^ 



TTv 



^ 



TTv 



F8 



TTs 



7f\ 



■^ 



tt; 



N 



M 



iJd 



< 



7Ts 



TTv 



■^ 



m 






TTv 



TTv 



F9 



H 



^ 



TR 



■^ 



TR 



^ 



TTv 



TTv 



F10 



IL 



?^^^^^ 



:j^ 



) 



:^ 



SHIFT 



::1J^ 



ili: 



2J^ 



ij^ 



:il<C 



^ ejoQ 



2J^ 



ZlC 



2J1C 



ZJd 



t 



4 



OQ e( 



1 2 3 



00 



TTv 



iki: 



=i(^ 



^ 



I- 



3.0 Translation Tables 

The Translation Tables must be defined in an assembly language 
program; like the program CSK. REV4. TEXT listed in section 6.0. 
This program is actually a group of Tables. The first Table is 
TRANTBL luhich points to seven the Translation Tables. 

The seven entries in this table point to the Translation Tables 
in the following order: 

1) SHIFT_TABLE (STABLE) 

2) REGULAR_ TABLE (HLTABLE) 

3) ESCAPE # SEQUENCE TABLE (ETABLE) 

4) STANDARD MULTIPLE CHARACTER SEQUENCE TABLE (SMTABLE) 

5) CAPS._QUALIFIER FLAG TABLE (CQTABLE) 

6) RELEASE TAHLE (RLTABLE) 

7) BREAK KEYCODE TABLE (BKEYCOD) 

These entries must be in the above order. 



3 1 SHIFT TABLE (STABLE) 

This table contains one byte for each keycode *00 - *5F. The 
byte is normally the character code for the specified keycode 
when the SHIFT key is depressed. Four special byte values are 
used: 

9E - use STANDARD MULTIPLE CHARACTER SEQUENCE TABLE (SMTABLE). 
9F - use CAPS QUALIFIER FLAG TABLE (CQTABLE). 
9D - use ESCAPE # SEQUENCE TABLE (ETABLE). 
00 - no character for this keycode. 

3. 2 REGULAR TABLE (RLTABLE) 

This table contains one byte for each keycode *00 - *5F. The 
byte is normally the charater code for the specified keycode uihen 
the SHIFT key is not depressed. Four special byte values are 
used: 

9E - use STANDARD MULTIPLE CHARACTER SEQUENCE TABLE (SMTABLE). 
9F - use CAPS QUALIFIER FLAG TABLE (CQTABLE). 
9D - use ESCAPE » SEQUENCE TABLE (ETABLE). 
00 - no character for this keycode. 

3. 3 ESCAPE # SEQUENCE TABLE (ETABLE) 

This table is used uihen a table code of *9D is found in key 
closure or a table code of ♦9D is found in key SHIFT TABLE 



(STABLE) or the REGULAR TABLE (RLTABLE). It specifies a key 
which has an ESC » character sequence. Each keycode may have a 
different character based on the state of the tii/o qualifier keys 
(SHIFT and COMMAND). 

Each table entry has the form (entry length = 10 bytes) : 

1) Keycode (1 byte). 

2) filler byte : its value is O (1 byte). 

3) UnSHIFTed ?-. UnCOMMANDed (2 bytes). 

4) SHIFT only (2 bytes). 

5) COMMAND only (2 bytes). 

6) COMMAND & SHIFT together (2 bytes). 



Values for the version 04 keyboard: 



KEYCODE 



FILL 



US/UC 



S only I C only 



C/S 



KEY NAME 



*20 


00 


00 


OA 


14 


IE 


Function key 1 


«21 


00 


Ol 


OB 


13 


IF 


Function key 2 


*22 


00 


02 


OC 


16 


20 


Function key 3 


*23 


00 


03 


OD 


17 


21 


Function key 4 


*24 


00 


04 


OE 


IS 


22 


Function key 5 


*4A 


00 


FF 


FF 


FF 


FF 


COMMAND (clo^iure) 


*5a 


00 


05 


OF 


17 


23 


Function key 6 


*59 


00 


06 


10 


lA 


24 


Function key 7 


*5A 


00 


07 


11 


IB 


25 


Function key 8 


*5B 


00 


OS 


12 


IC 


26 


Function key 9 


«5C 


00 


09 


13 


ID 


27 


Function key 10 


*CA 


00 


FE 


FE. 


FE 


FE 


COMMMAND (release 



3. 4 STANDARD MULTIPLE CHARACTER SEQUENCE TABLE (SMTABLE) 

This table is used on key closure when a *9E table code is in the 
SHIFT TABLE (STABLE) or REGULAR TABLE (RLTABLE). Every entry 
uiith a *9E table code in the STABLE or RLTABLE must be in this 
table. 

Each entry is composed of 3 fields. 1) the keycode, 2) the string 
length/ and 3) the actual string. The string is the sequence of 
character codes placed in the buffer for this key. The Table 
does not have to be in keycode order. The table ends uith a 
special keycode of *FF and length of 0. 



5 - 



*00 


(cursor 
right) 


2 


S03 


(HOME 
up ) 


2 


*07 


( enter ) 


2 


SOS 


(cursor 
left) 


2 


»0B 


( c ursor 
d oujn ) 


2 


*3A 


(back 
tab ) 


2 


*5D 


( c ursor 
up ) 


2 


«4E 


( doub le 
zero) 


2 


*FF 








Values for the version 04 keyboard: 

KEYCODES I STRING LENGTH I STRING 

h 1- 

SIB S43 (esc C) 

SIB S48 (esc H) 

»13 S64 (esc d) 

SIB S44 (esc D) 

SIB S42 (esc B) 

SIE S69 (esc i) 

SIB S41 (esc A) 

S30 S30 (00) 

END OF THE TABLE 

3 5 CAPS LOCK fy. QUALIFIER FLAG TABLE (CQTABLE) 

This table contains one byte for each keycode SOO - $5F. The 
Keycode is a direct index into the table. Each byte is a set of 
flags All unused bits must be cleared (value = 0). The high 
order bit is the Caps lock flag for the corresponding Keycode. 
If the bit is set- this keycode generates a shifted character if 
the CAPS LOCK key is locked. Bit 6 is a special COMMAND key 
flag The remaining bits are special key qualifier flags. 

The bits currently defined are : 

7 - Caps lock flag : uhen set means this keycode generates a 
shifted character mhen Caps lock is lacked. 

6 - Special COMMAND key flag: 

■ uses ETABLE for closure - keycode high order bit 
c 1 osur e 

■ uses ETABLE for release - keycode has high order bit 
set. 

■ special non-repeating key. 
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5 


- 


Command 


4 


- 


Alternate 1 


3 


_ 


Fast 1 


2 


Caps lock 1 


1 


- 


Control 1 





_ 


Shift 



These bit indicate iDhich type of 
special key the keycode represents. 
At mosti one bit can be set on. 



The values for" the version 04 keyboard are listed in the attached 
program CSK. REV4. TEXT/ listed in section 6.0. 

3.6 RELEASE TABLE (RLTABLE) 

This table specifies ujhich keycodes have an action on key 
release. Each table has 2 fields. 1) the keycode/ and 2) the 
action code. 

The action code has 3 possible value types. If the action code is 
*9D it specifies a key ujith a ESCAPE # SEQUENCE TABLE (ETABLE) 
entry. If the action code is *9E it specifies a qualifier 
keycode. Any other action code is a character code to be placed 
into the buffer. The end of the table is specified by a special 
keycode of *FF and an action code of *00. 

Values for the version 04 keyboard: 



KEYCODE I ACTION CODE 



KEY NAME 



»1F 


*9E 


*3C 


*9E 


♦3E 


*9E 


»48 


»9E 


♦49 


*9E 


$4A 


♦9E 


♦4C 


*9E 


♦FF 


$00 



Right SHIFT 

CAPS LOCK 

Left SHIFT 

Control (CTRL) 

FAST 

COMMAND 

Alternate (ALT) 

NULL keycode - END OF TABLE 



3. 7 BREAK KEY CODE TABLE (BKEYCOD) 



This table consists of one byte. It is the Keycode for the key 
uihich performs the start/stop toggle. The value for the version 
04 keyboard is ; *DF. This is the Keycode for BREAK closure. 
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4.0 Translation Table examples 

This section gives the user several examples of how to change the 
Keyboard Tranlation tables. The examples deal tuith the unmarked keii on 
the top roui of keys (keycode *5E). 

4. 1 Alphabetic character example 

The first example is to use the unmarked key (keycode «3E) as a standard 
alphabetic character key. This involves setting a value in the 
Translation Tables for the unshiftedi shifted/ and qualifier cases of 
the key. 

A. These tables use the keycode value as an offset into the tables 
Locate the unmarked key on the keyboard and note the position 
Locate the same key in the keycode chart and note the keycode for 
closure (5E>. 

B. For this example let us assume the desired output of the 
Translations Tables is to be the alphabetic character 't' for 
unSHIFTed, 'T' for SHIFTed, and 'T for CAPS LOCK. 

C. Create a file with the same tables as the program CSK. REV4 TEXT. 



D. Locate the position 3E in the SHIFT Table. Note that the current 
entry is 9F hex uihich indicates the key is a qualifier. In this 
example the SHIFT Table entry mill be changed to a 'T' or 54 hex. 
Edit the STADLE at postion 3E hex to contain the value 34 hex. 

THE SHIFT TABLE 

THE SHIFT TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE. 

The character sgmboi is above each character code 

SMC = special value for Standard Multiple Character Sequence <*9E) 
QUL = special value for Qualifier (*9F> 

EST = special value for Escape Sharp Character Sequence (*9D) 
= No keg for this keycode 

STADLE 

SMC 3 9 SMC 6 ■ - cr SMC 1 7 SMC 4 S 3 2 ; MSB 
DATA B »9E, *33, »39, »9E, »36, »2C, »2D, «0D, »9E, SSI. «37, »9E, »34- »3e, »33, »32 ; »00 

+ . <:dflcr> ;... ) ? P _: ~ '■ QUL 
DATA B »2B. «00, »7B, »7F, »0D, f7D, »7C, »00, »29, SSF, »50, »3F, •3A, »7E, *22, *9F i tlO 

EST EST EST EST EST » 7. R T F G V B 

DATA B »9D, *9D, *9D. »9D, »9D. ♦00. SOO, *00, »24, *3S, »32, »34, •46- *47, »36, »42 i •20 

e»WESDXC esc I SMC Q QUL A QUL Z 
DATA. B »40, »23, »37, »43, *53. •44, »38, »43, »1B, »21. •<?£. »31. •9F, »4 1 , »9F, »3A f »30 

?.. Y U H J N M QUL QUL QUL sp QUL O SMC 

DATA B »5E, »26, »59, »35, »4B, »4A, *4E. »4D, »9F, »9F, »9F, •20, »9F, «30, •9E, •2E i *40 

« ( I a k^ L < :> EST EST EST EST EST SMC QUL QUL 

DATA B »2A, »2S, •49, «4F, •4B, •4C- »3C, •SE, ¥90, ^90, •9D, •9D, ^90, •9E, »9F, •9F i »30 
LSB 012 3 4367S9ABCDEF 

Change the last line to the following: 

» ( I K L <: :> EST EST EST EST EST SMC T QUL 

DATA. B «2A, »28, »49. •4F, ^43, »4C, «3C, »3E, *9D, »9D, *9D, *9D, «9D, »9E, »S4, «9F ; 530 
LSB 01234367B9ABCDEF 
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E. Locate the position SE in the REGULAR Table. Note that the current 
entry is 9F hex uihich indicates the key is a ((ualifier. In this 
example the REOULAR table entry u/i 1 1 be changed to a 't' or 74 hex. 
Edit the RTABLE at position 9E hex to contain the value 74 hex. 

THE REOULAR TABLE - UNSHIFTED OR LOWER CASE 

THE REOULAR TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE. 

The character symbol is above each character code 

SliC 1 special value for Standard Multiple Character Sequence ($9E) 
QUL = special value for Qualifier (*9F) 

EST • special value for Escape Sharp Character Sequence (»9D) 
... B No key for this keycode 

RTABLE 

SMC 3 9 SMC 6 . - cr SMC 1 7 SMC 4 8 3 2 ; MSB 
DATA. B ♦9E, *33. •39/ *9E, »36, •2C. «2D, SOD. »9E. «31. «37, •9E, «34. *3B/ »33, «32 i »00 

»... C bscr3 \...0 / p - ; " ' QUL 
DATA. B »3D. «00. »5B. «08, DODi «3D. ftSC. «00> *30. «SF. »70, *3D. «3B. *60, $27, «9F i »10 

EST EST EST EST EST 4 S r t f g v b 

DATA. B «9D, •9D, »9D. *9D, »9D, »00, »00, »00, »34. »35. •72, •74, *i}b. *67, ^76, «(b2 i »20 

23uesdxc esc 1 SMC q. QUL a QUL 2 
DATA. B *32i ^33, »77, *65, •73, •64, «78, «63, »1B, SSI, •09, ^71, •9F, *61, •9F, •7A - «30 

6 7 y u h J n m QUL QUL QUL sp QUL SMC 

DATA. B *36, *37, «79, •75, «68, •AA, «6E, «6D, «9F, «9F, «9F, ♦20, •9F, «30, «9E, *2E ; «40 

8 9 1 o k 1 , EST EST EST EST EST SMC QUL QUL 

DATA. B *38, *39. •69, «6F, »6B, •6C, »2C, »2E, •9D, •9D, ^90, •9D, •9D, •9E, •9F, «9F ; »30 
LSB 1 234 S678 9AB C DEF 

Change the last line to the folloiuing: 

8 9 1 o k 1 , EST EST EST EST EST SMC t QUL 

DATA. B »38, »39, ^69, «6F, 96B, •6C, *2C, •2E, •9D, *9D, •9D, •9D, 490, »9E, »74, •9F i »30 
LSB 0123436789ABCDEF 
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F. Locate the position 5E in the CAPS/QUALIFIER Table. Note that the 
current entry is 00 hex uihich indicates the key does not have any 
flags set in the CAPS/QUALIFIER Table. In this example the 
CAPS/QUALIFIER Table entry mill be changed to a 80 hex, to set the 
Caps lock flag in the table. Edit the CQTABLE at position 9E hex to 
contain the value 80 hex. 

THE CAPS/QUALIFIER FLAG TABLE 

THE TABLE IS INDEXED BY KEYCQDE. EACH BYTE REPRESENTS THE ENTRY FDR 
THE CORRESPONDING KEYCODE. 

Each byte has 8 flags : 

D7 ' Caps lock flag (i>hen set means this keycode generates a 

shifted character uihen the Caps lock q.ualifier flag is set. 
D6 => Qualifier has an ESC # seq.uence flag. Mhen sat then must process 
the keycode as a non-repeating ESC # sequence. Also has a Release 
sequence. 



D5 = Command — 
D4 = Alternate 
D3 = Fast 
D2 - Caps loc k 
Dl = Control 
DO = Shift 



This bit says uhich type of Qualifier 
key the Keycode represents. 



CQTABLE 

;MSB 

DATA. B *00, »00, »00. «00, »00, $00, »00, »00, »00. »00, •00, »00. tOO. •00, •OO, •00 j #00 

DATA. B «00, •00, •OO, •OO, $00, •00, »00, VOO, •00. •OO, •SO, •OO, •OO, •OO, •00, •Ol i •lO 

DATA. B $00, »00, •00, •OO, •OO, •00, •OO, »00, •GO, •00, •80, 980, 980, •80. ^80, ^80 i •SO 

DATA. D SOO, $00, •80, •SO, •SO, VSO, •80. •80, •OO, •OO, •OO, •SO, ^04, •SO, •Ol, «80 I *30 

DATA. B «00, ¥00, •SO, SSO, •SO, •80. •SO. •SO, •OZ, aOS, ^60. •OO, •lO, •OO, »00, •OO ) *40 

DATA. B »00, •OO, »B0. •SO, •SO. •SO, •OO, •OO, •OO. •OO. •00, •OO, •OO, •OO, •OO, •OO i ^30 

LSB 0123436787ABCDEF 

Change the last line to the follouing: 

DATA. B «00, •OO, VSO, •SO, •SO, •80. •OO, •00, *Q0, •OO, •OO, •OO, •OO, •OO, •80, •OO I •SO 
LSB 01234S6789ABCDEF 
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Save the edited version of the Keyboard Translation Tables to a test 
file. Assemble the file as follouis: 

ASM68K filename CRETURN] 

Upon completion of the assemblyi link the file for quick load as 
follouis: 

LINKER filename CRETURN] 

The last step is to load the neiu Keyboard Translation Table. 

Press CWndotuMgr]. 

Press CLdKybdChD. 

Enter the filename. CRETURN3. 

A successful load of the tables uill be noted in the Command Line. Begin 
testing the results of the neu tables by pressing the unmarked key. Use 
the SHIFT key and the CAPS LOCK key and note the results. 
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4. 3 STANDARD MULTIPLE CHARATER TABLE MODIFICATION 

This example dealS ujith the modification of the STANDARD MULTIPLE 
CHARACTER SEQUENCE TABLE. The Translation Tables mill now be modified 
to use the unmarked key (keycode 3E) as Cursor Right. 

A. Create a file uith the same entries as the CSK. REV4. TEXT file. 

B Locate the STANDARD MULTIPLE CHARACTER SEQUENCE TABLE tiilthin the file. 
It should be as follouis: 

STANDARD MULTIPLE CHARACTER SEQUENCE TABLE 

FORMAT : ( KEYCODE, LENGTH, CHARACTER_SEQUENCE) 

The LENGTH field is the number of characters in the CHARACTER SEQUENCE field. 
The CHARACTER SEQUENCE is the characters to return for the Keycode. 



SMTABLE 



KEYCODE LENGTH CHARACTER SEQUENCE 



DATA. B 


»00, 


?, 


»1B. 


«43 


DATA. B 


»03, 


2, 


$1B, 


»48 


DATA. B 


»07, 


2. 


»1B, 


$64 


DATA. B 


»0B, 


S., 


«1B 


»44 


DATA. B 


«0B, 


P, 


»1B 


»42 


DATA. B 


*3A, 


3. 


SIB 


»69 


DATA. B 


*3D, 


2, 


«1B 


«41 


DATA. B 


»4E, 


2, 


»30 


*30 


DATA. B 


»FF, 










CURSOR RIGHT 

HOME UP 

ENTER 

CURSOR LEFT 

CURSOR DOWN 

BACK TAB 

CURSOR UP 

DOUBLE ZERO-( 00 KEY ) 

NULL KEYCODE - END OF TABLE 



Enter a duplication of the first entry in the table as the last entry 

in the table. Change the KEYCODE from »00 to 9SE. The unmarked key is noui 

defined as CURSOR RIGHT. 



SMTABLE 



KEYCODE LENGTH CHARACTER SEQUENCE 



DATA. B 


»00, 


2, 


«1B 


•43 


DATA. B 


«03, 


2, 


«1B, 


•48 


DATA. B 


♦07, 


2, 


»1B. 


•64 


DATA. B 


»08, 


2, 


*1B, 


•44 


DATA. B 


»0B, 


2, 


• IB, 


•42 


DATA. B 


«3A, 


2, 


CIB, 


•69 


DATA. B 


• SD, 


2, 


«1B, 


• 41 


DATA. B 


»4E, 


2, 


»30, 


•30 


DATA. B 


♦ 5E, 


2, 


• IB, 


•43 


DATA. B 


»FF, 










; CURSOR RIGHT 

i HOME UP 

; ENTER 

I CURSOR LEFT 

CURSOR DOMN 

BACK TAB 

CURSOR UP 

DOUBLE ZERO-( 00 KEY ) 

CURSOR RIGHT 

NULL KEYCODE 



END OF TABLE 
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D, Locate the position 5E in the SHIFT Table. Note that the current 
entry is 9F hex uihich indicates the key is a qualifier. In this 
example the SHIFT Table entry iDill be changed to a *9E hex. Edit 
the STABLE at postion 5E hex to contain the value 9E hex. 

THE SHIFT TABLE 

THE SHIFT TABLE IS INDEXED BY KEYCaDE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE, 

The character symbol is above each character code 

SMC ■! special value for Standard Multiple Character Sequence (*9E) 
QUL = special value for Qualifier (*9K) 

EST = special value for Escape Sharp Character Sequence (*9D) 
... "No key for this keycode 

STABLE 

SMC 3 9 SMC 6 , - cr SMC 1 7 SMC 4 8 5 3 ; MSB 
DATA. B «9E, *33. «39, »9E, *36, »2G, *2D, «0D, «9E, «31, *37, *9E, «34, «3S, *35, «32 ; «00 

+ ... <delcr> I.. ) ? P _ -v.. QUL 
DATA. B *2B, *0Q, »7B, «7F, *0D, »7D, «7C, *00, *29. *3F, *50, *5F, *3A, *7E, *23, »9F , »10 

EST EST EST EST EST » 7. R T F G V B 

DATA. B *9D. »7D, *9D. *9D, »9D. »00, «00- *00, *24, »23. *52, *54. »46, *47, »56, *42 i *20 

a#WESDXC esc ! SMC Q QUL A QUL Z 
DATA. B »40, *23, »S7, «45, »53, »44, %SB, *43. *1B, «21. »9E, »51, »9F. $41, »9F, *5A ; »30 

■*■ & Y U H J N M QUL QUL QUL sp QUL O SMC 
DATA. B *5E, »26, *59, *55, *48, «4A, «4E, *4D, *9F, S9F, *9F, «20, *9F, *30, S9E, «2E ; $40 

• ( I O K L C ;> EST EST EST EST EST SMC QUL QUL 

DATA, B »2A/ *28, »49, »4F, *4B, *4C, «3C, »3E, *9D, *9D. «9D, »9D, S9D, «9E, *9F, *9F , *50 
LSB 012345<b7a9ABCDEK 

Change the last line to the follouilng: 

« < I K L < > EST EST EST EST EST SMC SMC QUL 

DATA. B *2A, »28, »49, «4F, «4B, »4C, *3C, «3E, «9D, «9D, «9D, »9D, *9D, »9E, *9E, «9F ; *50 
LSB 1234367S9ABCDEF 



IS 



E. Locate the poiition 3E in the REGULAR Table. Note that the current 
entry is 9F hex uhich indicates the key is a qualifier. In this 
example the REGULAR table entry ulll be changed to a 9E hex. Edit 
the RTABLE at position 5E hex to contain the value 9E hex. 

THE REGULAR TABLE - UNSHIFTED OR LOWER CASE 

THE REGULAR TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE. 

The character symbol is above each character code 

SMC " special value for Standard Multiple Character Seiiuence (*9E> 
QUL = special value for Qualifier (•9F) 

EST •: special value for Escape Sharp Character Sequence («9D> 
. . = No key for this keycode 

RTABLE 

SMC 3 9 SMC 6 , - cr SMC 1 7 SMC 4 8 3 2 i MSB 

DATA. B *9E, »33, •39, »9E, »36. •2C. •2D, •OD, •9E, »31, •37, •9E, •34, •38, •33, »32 i •OO 

=... C bscrJ \... / p - i - • QUL 

DATA. B »3D, »00, ♦5B, •08, »0D, •SD, •3C, •00, »30, •2F, ^70, •2D, *3B, *60, •27, •9F i •lO 

EST EST EST EST EST 4 3 r t f g v b 

DATA B »9D, •9D, »9D, •9D, »9D, •00, •00, »00, »34, •33, ^72, »74, »66, »67, •76, »62 i ^20 
ui e s d X cescl SMC q QUL a QUL z 
•77, SiS, »73, •64, •TS, ^63, •IB, •31, ^09, •71, •9F, •61, •9F, «7A i •30 

y u h J n m QUL QUL QUL sp QUL O SMC 

• 79, •73, »68, »6A, •6E, •6D, »9F, •9F, »9F, ^20, •9F- ¥30, •9E, •2E i ^40 

1 o k 1 , EST EST EST EST EST SMC QUL QUL 

•69, •6F, »6B, ^60, »2C, •2E, ^90, »9D, ^90, •9D, »9D, •9E. •9F, •9F ; •30 
23436789ABCDEF 

Change the last line to the follouing: 

8 9 i o k 1 , EST EST EST EST EST SMC SMC QUL 

DATA B »38, «39, »69, ttF, •6B, •6C, •2C, «2E, »9D, ^90, »9D, •9D, •9D, •9E, »9E, •9F i •BO 
LSB 0123436789ABCDEF 

- Save, Assemble, Link, and Load as in the previous example. 







2 


3 


DATA. 


B 


•32, 


•33 






6 


7 


DATA. 


B 


•36, 


•37 






8 


9 


DATA 


B 


• 38, 


• 39 


LSB 







1 
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4. 3 ESCAPE SHARP SEQUENCE TABLE 

This example deals ulth the modification of the ESCAPE SHARP SEQUENCE 
TABLE. The Translation Tables uill noui be modified to use the unmarked 
key as the FUNCTION KEY 1. 

A. Create a file uiith the same' entries as the CSK. REV/4. TEXT file. 



B. Locate the ESCAPE SHARP SEQUENCE TABLE uithin the file, 
as follouis: 



It should be 



ESCAPE SHARP (#) SEQUENCE TABLE 

FORMAT : (KEYCODE, FILLER. US/UC, SHIFT, COMMAND, C/S ) 

The fill field is added to keep each record on an even byte boundary 
The other fields contain the character sequence to folloui the ESCAPE # 
characters: 

US/UC ~ uihen the Shift and Command key are released 
SHIFT " when only the Shift key is still being pressed 
COMMAND " when only the Command key is still being pressed 
C/S = when the Shift and Command keys are still being pressed 



STABLE 





KEYCOD 


E FILL 


US/UC 


SHIFT 


COMMAND 


C/S 






DATA. B 


«20, 


0. 


'00', 


'OA', 


'14'. 


'IE' 


FUNCTION HEY 


1 


DATA. B 


»21. 


0, 


'01 ', 


'OB'. 


'13'. 


'IF' 


FUNCTION KEY 


2 


DATA. B 


»22. 


0, 


'02', 


'OC, 


'16', 


'30' 


FUNCTION HEY 


3 


DATA. B 


«23, 


0, 


'03', 


'OD', 


'17', 


'21 ' 


FUNCTION KEY 


4 


DATA. B 


*24, 


0, 


'04', 


'OE', 


'IS', 


'22' 


FUNCTION KEY 


5 


DATA. B 


»4A, 


0, 


'FF', 


'FF'. 


'FF', 


'FF' 


LEFT COMMAND 


(CLOSURE) 


DATA. B 


«38, 


0, 


'05', 


'OF'. 


'19', 


'23' 


FUNCTION KEY 


6 


DATA. B 


«S9, 


0, 


'06', 


'10', 


'lA', 


'24' 


FUNCTION KEY 


7 


DATA. B 


•SA, 


0, 


'07', 


'11 ', 


'IB', 


'35' 


FUNCTION KEY 


S 


DATA. B 


»3B, 


0, 


'08', 


'13', 


'IC, 


'26' 


FUNCTION KEY 


9 


DATA. B 


♦3C, 


0, 


'09', 


'13'. 


'ID', 


'27' 


FUNCTION KEY 


10 


DATA. B 


•CA, 


0, 


'FE', 


'FE'. 


'FE', 


'FE' 


LEFT COMMAND 


(RELEASE) 



C. Enter a duplication of the first entry in the table as the last entry 

in the table. Change the KEYCODE from «20 to $5E. The unmarked key is nc 
defined as FUNCTION KEY 1. 



STABLE 





KEYCODE 


FILL 


US/UC 


SHIFT 


COMMAND 


C/S 








DATA. B 


»20, 


0, 


'OO', 


'OA', 


'14', 


'IE' 


FUNCTION 


KEY 


1 


DATA. B 


»21, 


0, 


'01 ', 


'OB', 


'15', 


'IF' 


FUNCTION 


KEY 


2 


DATA. B 


»22, 


0. 


'02', 


'OC, 


'16', 


'20' 


FUNCTION 


KEY 


3 


DATA. B 


«23, 


0, 


'03', 


'OD', 


'17', 


'21 ' 


FUNCTION 


KEY 


4 


DATA. B 


»24, 


0, 


'04', 


'OE', 


'IB', 


'22' 


FUNCTION 


KEY 


5 



17 



DATA. 


B 


*4A, 


0, 


DATA. 


B 


• 98. 


0, 


DATA. 


B 


• 39, 


0, 


DATA. 


B 


• 5A, 


0, 


DATA. 


B 


• SB, 


0, 


DATA. 


B 


•9C, 


0, 


DATA. 


B 


• 3E, 


0, 


DATA. 


B 


•CA, 


0, 



FF', 


'FF', 


'FF' 


OS', 


'OF', 


'19' 


06', 


'10', 


'lA' 


07', 


'11 ', 


'IB' 


08', 


'12'. 


'IC 


09', 


'13', 


'ID' 


00', 


'OA', 


'1*' 


FE', 


'FE', 


'FE' 



FF' 


iLEFT COMMAND 


(CLOSURE) 


23' 


J FUNCTION KEY 


6 


24' 


i FUNCTION KEY 


7 


as' 


i FUNCTION KEY 


8 


26' 


> FUNCTION KEY 


9 


27' 


i FUNCTION KEY 


10 


IE' 


1 FUNCTION KEY 


1 


FE' 


iLEFT COMMAND 


(RELEASE) 



IB 



D. Locata the position 9E In the SHIFT Table. Note that the current 
entry it 9F hex uhich indicates the key is a q,ualifier. In this 
example the SHIFT Table entry mill be changed to a «9D hex. Edit 
the STABLE at postion 3E hex to contain the value 9D. 

THE SHIFT TABLE 

THE SHIFT TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE. 

The character symbol is above each character code 

SMC •• special value for Standard Multiple Character Sequence (•■JE) 
QUL " special value for Qualifier (»9F) 

EST •■ special value for Escape Sharp Character Seq,uence ($9D) 
... "No key for this keycode 

STABLE 

SMC 3 9 SMC 6 . - cr SMC 1 7 SMC 4 3 5 2 i MSB 
DATA. Q »9E. •33, »39< •9E, »36. »2C. «2D, *0D, »9E, »31, »37, «9E, *34, *38, »35, «32 > «00 

+ ... < del cr > 1 . . . ) ? P _ ~ " QUL 
DATA. B »2B. »00, tTB. »7F, »0D, *7D, »7C. •00, ^29, »3F, •50, •SF, SSA, »7E, •22, »9F ; •lO 

EST EST EST EST EST • 7. R T F G V H 

DATA. B •9D, •9D, •9D, •9D, *<fD, •OO, $00, •OO, CZA, »2S. *SZ, •SA, •46, $47, •SA. $42 ; $20 

eWMESDXC esc I SMC Q QUL A QUL Z 
DATA. B »40, •23, •57, »45, •SS, #44, •58, ^43, »1B, «21, •9E, •51, •9F, •41, •9F, »3A ; «30 

-^fcYUHJNM QUL QUL QUL sp QUL SMC 
DATA, B «5E, ^26, •S9, *9S, •48, •4A, •4E, ♦4D, •9F, «9F, »9F, *20, •9F, »30, •9E, »2E i «40 

« ( I O K L < > EST EST EST EST EST SMC QUL QUL 

DATA. B »2A, ^28, »49, »4F, »4B, ^40, •3C, •aE, •9D, ^90, ^90, ^90, 490, •9E, »9F, »9F > •50 
LSB 0123436789ABCDEF 

Change the last line to the follouiing: 

» ( I O K L < > EST EST EST EST EST SMC EST QUL 

DATA. B •2A, ^28, ^49, •4F, •4B, •4C, »3C, WSE, •9D, »9D, ^90, »9D, S9D, •9E, »9D, »9F , «50 
LSB 0l23456789ABCDEr-- 
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E. Locate the position 5E in the REGULAR Table. Note that the current 
entry is 9F hex uihich indicates the key is a qualifier. In this 
example the REGULAR table entry mill be changed to a $9D hex. Edit 
the RTABLE at position 3E hex to contain the value 9D hex. 

THE REGULAR TABLE - UNSHIFTED OR LOWER CASE 

THE REGULAR TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE 
CHARACTER CODE FOR THE CORRESPONDING KEYCODE. 

The character symbol is above each character code 

SMC = special value for Standard Multiple Character Sequence <*9E) 
QUL = special value for Qualifier (♦9F) 

EST = special value for Escape Sharp Character Sequence (*9D) 
= No key for this keycode 

RTABLE 

SMC 3 9 SMC 6 , - c r SMC 1 7 SMC 4 8 3 2; MSB 
DATA. B «9E, *33, »39, *9E, »36, «2C, »2D, «0D, »9E, *31, »37, •9E, «34, *3B, »3S, •32 ; •00 

=.. C bscr: \.. O / p - i ' ' QUL 
DATA. B *3D, *00, *5B, *08, SOD, *5D, «5C, *00, »30, »2F. •70, »2D. »3B. »60, »27, *9F i •lO 

EST EST EST EST EST 4 5 r t f g v b 

DATA B »9D, »9D, »9D, »9D, »9D, •00. •00, »00, «34, «35, »72, ¥74, *66, *b7 , •76, ^62 i *20 

2 3 w e s d X c esc 1 SMC q QUL a QUL z 
DATA B 432. »33, »77, *65, *73, ^64, ^78, •63, »1B, »31. »09, •71, »9F, %bl, »9F, *7f\ i •SO 

67yuh jnm QUL QUL QUL sp QUL O SMC 
DATA B »36, *37, »79, *75, •68, *hf\, »6E, •6D, »9F, •9F, •9F, •20, »9F, •30, *9E. •SE i ^40 

8 9 i o k 1 , EST EST EST EST EST SMC QUL QUL 

DATA. B *38, *39, »69, SiF, •6B, »(bC, *2C, •SE, ♦9D, »9D, »9D, ^90, »9D, •9E, •9F, •9F i •30 
LSB 0123436789ABCDEF 

Change the last line to the following: 

8 9 i o k 1 , EST EST EST EST EST SMC EST QUL 

DATA. B «3B, »39, »69, *6F, »6B, •6C, »2C, •SE, ^90, •90, ^90, •9D, *9D- »9E, •9D, •9F i •SO 
LSB 01234367S9ABCDEF 

F Save, Assemble, Link, and Load as in the previous example. 



- ?0 



5.0 Default Keyboard Translation Table 

To make a Keyboard Translation Table the system default tablei put the 
linker out file for the Keyboard Translation Table into the volume 
/CCSYS/ iDith a file name of CSK. DEFAULT. 



?1 



6.0 Program CSK. REV4. TEXT listing 



THIS FILE CONTAINS THE TABLES FOR THE KEYBOARD DRIVER FOR THE VERSION 
04 KEYBOARD (Selectric style ASCII uith ALT key and Back Space key 
moved from the version 3 location). 



file 
date 



csk . rev4. text 
03-0ct-B2 kb 



TRANSLATION TABLE 



TRANTBL 



DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 



STABLE - 
RTABLE - 
ETABLE - 
SMTABLE- 
CQTABLE- 
RLTABLE- 
BKEYCOD- 



TRANTBL 
TRANTBL 
TRANTBL 
TRANTBL 
TRANTBL 
TRANTBL 
TRANTBL 



POINTER TO SHIFT TABLE 
POINTER TO REGULAR TABLE 
POINTER TO ESCAPE # TABLE 
PTR TO STANDARD MULT CHAR TABLE 
POINTER TO CAP/QUALIFIER TABLE 
POINTER TO RELEASE TABLE 
POINTER TO BREAK KEYCODE TABLE 



LENGTH OF FILE DATA AFTER TRANSLATION TABLE 

DATA. W LENGTH 
VERSION DATE 



VERSION 

START 
page 



DATA. B 
RTS 



'070682' 



NOTE: 

All the tables have keycodes uiith the closure/release bit (MSB) of the Keycod 

clear (0)i except the Break Keycode Table. 

THE SHIFT TABLE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 
CODE FOR THE CORReSPONDINO KEYCODE. 

Used on Closure only when Shift key Is being pressed (Shift flag is set). 

The character symbol is above each character code 

SMC = special value for Standard Multiple Character Sequence (*9E) 
QUL » special value for Qualifier («?F) 

EST ~ special, value for Escape Sharp Character Sequence (*9D) 
... 'No key for this keycode 



23 



DATA 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


LSB 




page 





STABLE 

; SMC 3 9 SMC 6 . - cr SMC 1 7 SMC 4 8 5 2; MSB 

«9E, »33, «39. «"?£, »36, »2C, *2D, »OD, «9E, *31, »37. «9E. »34, »38, «35- »3a ; «00 

+ ... < del cr > I . . . ) ? P _ : ~ " MUl. 
»2B, »00, *7B. *7F, »0D, S7D, «7C, $00. »39- *3F, »S0, »5F, «3A, »7E, »22. *9F ; *.tO 

EST EST EST EST EST » 7. R T F G V B 

*9D. »9D. «9D, »9D, *9D. »00. »00, »00, •24, »25. •52, «54, »46, »47, «56, »42 i 420 

e#WESDXCesc( SMC Q QUL A QUL Z 
• 40, »23, *57, »43, •S3, »44, »3B, »43, »1B, *21, •9E, »51. •9F, •41, »9F, »3A i *30 

' 5i Y U H J N M QUL QUL QUL sp QUL O SMC 
»5E, *26, *59, «55. ^48, *4A, •4E, •4D, •9F, •9F, •9F, »20, •9F, %30, »9E, »2E ; *40 

» < I O K L . < > EST EST EST EST EST SMC EST EST 
•2A, »28, «49, •4F, »4B, »4C , »3C, »3E, »9D, »9D, »9D, »9D, •9D, »9E, *9F, »9F i «50 

0ia3456789ABCDEF 

, THE REGULAR TABLE - UNSHIFTED OR LOWER CASE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 
/ CODE FOR THE CORRESPONDING KEYCODE. 

, Used on Closure only mhen Shift hey is released (Shift flag is clear). 

i The character symbol is above each character code 

; SMC = special value for Standard Multiple Character Sequence {•7E) 

i QUL = special value for Qualifier (•9F) 

i EST = special value for Escape Sharp Character Sequence (»9D> 

; . . . = No key for this keycode 

RTABLE 

i SMC 3 9 SMC 6 , - cr SMC 1 7 SMC 4 8^2; MSB 

DATA. B »9E, »33, »39, •9E, •36, »2C, »2D, •OD, *9E, »31, ^37, •9E, »34, »38, »33, ¥32 i *00 

i = . . . r bs cr 3 \ . . . O / p - i ^ ' QUL 

DATA. B »3D, •00, •5B< •OS, •OD, •OD, »3C, •CO, •SO, •2F, ^70, ^20, *3B, •60, «27, •9F ; «10 

i EST EST EST EST EST 4 3 r t f g v b 

DATA. B •9D, •9D, *9D, *9D, »9D, •OO, »00, •00, »34, »3S, ^72, •74, »66, »67, «76, »62 i •20 

i 23uiesdxc e&c 1 SMC q QUL a QUL z 

DATA. B ^32, ^33, *77, *63, »73, «64, «7B, •63, •IB, ¥31, ¥09, ^71, »9F, «61, •9F, •7A i «30 

i 67yuhjnm QUL QUL QUL sp QUL SMC 

DATA. B ^36, »37, ¥79, »73, ^68, •6A, •6E, »6D, •9F, *9F, •9F, ^20, ♦9F, •SO, •9E, *2E i «40 

i 8 9 i o k 1 , . EST EST EST EST EST SMC EST EST 

DATA. B »38, •39, •69, •6F, •6B, *bC. •2C, »2E, •9D, »9D, ^90, »9D, •9D, •9E, »9F, *9F > »50 

i LSB 0123456789ABCDEF 

page 

i THE CAPS/QUALIFIER FLAG TABLE 

; TABLE IS INDEXED BY KEYCODE, EACH BYTE REPRESENTS THE ENTRY FOR 

i THE CORRESPONDING KEYCODE. 

i Used on Closure ujhen a •9F is In the Keycode entry of the Shift or Regular 
i Table, process a Qualifier. Also on Closure u/hen the Caps Lock Key is 



- PA 



being pressed (CapsLock flag is set). 
Used on Release when a *9E action code is in the Keycode entry of the Release 
Table. 

Each byte has 8 flags : 

D7 = Caps lock flag luhen set means this keycode generates a 

shifted character uihen the Caps lock qualifier flag is set. 
D6 = Qualifier has an ESC # sequence flag. When set then must process 

the keycode as a non-repeating ESC # sequence. Also has a Release 

r.equent e. 



D5 
D4 
D3 
D2 
Dl 
DO 



Command — 

Al ternate 

Fast 

C a p >j 1 CI c k 

Contra ) 

tihift 



This bit says which type of Qualifier 
key the Heycode represents. 



C(3TABL£ 

DATA B 
DATA. B 
DATA. Q 
DATA B 
DATA. B 
DATA B 

, USB 
page 

, ESCAPE 



*00, »00, 
«00, *00, 
*00, «00, 
*00, *00, 
*00, *00, 
$00, $00, 
I 

SHARP <tt) 
FORMAT : 



«00- *00, 
*00, *00, 
*00. *00, 

*Bo. *eo, 

*S0, »80, 

S80. *ao, 

r' 3 



»00, *00, *00, »00, »00, *00, *00, »00, *00, *00, 
*00, *00, *00, *00, *00, *00, »80. »00, *00, *00, 

*oo, *oo, *oo, »oo, *oo, *oo, »8o, S80. «so, »eo, 

«B0, «80, «80, »80, $00, «00, *00, »B0, «04, »80, 

*80, «80, *H0, *80, »02, *08, *&0, »00, *10, *00, 

$80, *aO, SCO, »00, $00, »00, *00, «00, $00, *00, 

4 !i 6 7 8 9 A B C D 







i MSB 


»00, 


*00 


i «00 


»00, 


«01 


) SIO 


«80, 


$80 


/ *ao 


«01, 


*80 


i *30 


*00, 


«00 


; «40 


«00, 


*00 


i *50 


E 


F 





SfcQUKNCE TABLt 
(KEYCODE, FILLER, US/UC, SHIFT, COMMAND, C/S) 



Used on Closure uihen a *9D is in the Keycode entry of the Shift or 

Regular Table. 
Used on Release uhen a *9D action code is in the Keycode entry of 

the Release Table. Release keycode has high order bit set. 

The fill field is added to keep each record on an even byte boundary 
The other fields contain the character sequence to folloui the ESCAPE # 
characters: 

US/UC = ii/hen the Shift and Command key are released 
SHIFT = when only the Shift key is still being pressed 
COMMAND = u/hen only the Command key is still being pressed 

C/S = when the Shift and Command keys are still being pressed 



ETABLE 














, 


KEYCODE 


FILL 


US/UC SHIFT 


COMMAND 


C/S 


DATA. B 


»20, 


0, 


'00' 


'OA', 


'14', 


'IE' 


DATA B 


«21, 


0, 


'01 ' 


'OB', 


'15', 


'IF' 


DATA. B 


«22, 


0, 


'02' 


'OC ', 


'16', 


'20' 


DATA. B 


*23, 


0, 


'03' 


'OD', 


'17', 


'21 ' 


DATA B 


$24, 


0, 


'04' 


'OE', 


'IB', 


'22' 



FUNCTION KEY 1 

FUNCTION KEY 2 

FUNCTION KEY 3 

FUNCTION KEY 4 

FUNCTION KEY 3 



DATA 


B 


*4A, 





DATA 


Q 


*58, 





DATA. 


B 


%59, 





DATA. 


B 


»5A, 





DATA 


B 


»5B, 





DATA 


B 


»3C, 





DATA. 


B 


»CA, 
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FF' 


'FF', 


'FF 


05' 


'OF', 


'19 


06' 


'10', 


'lA 


07' 


'11 '- 


'IB 


08' 


'12', 


'IC 


09 ' 


'13', 


'in 


FE' 


'FE', 


'FE 



FF' 


LEFT COMMAND 


(CLOSURF) 


23' 


FUNCTION KEY 


6 


24' 


FUNCTION HEY 


7. 


25' 


FUNCTION KEY 


8 


26' 


FUNCTION KEY 


9 


27' 


FUNCTION KEY 


10 


FE' 


LEFT COMMAND 


(RELEASE) 



STANDARD MULTIPLE CHARACTER SEQUENCE TABLE 

FORMAT (KEYCODE, LENSTH, CHARACTER_SEQUENCE) 

Used on Closure when a *9E is in the Keycode entry of the Shift: or 
Regular Table. 

The LENGTH field is the number of characters in the CHARACTER SEQUENCE field 
The CHARACTER SEQUENCE is the characters to return for the Keycode 



SMTABLE 



KEYCODE LFNGTH CHARACTER SEQUENCE 



DATA. E 


«00, 


2, 


*1B, »43 


CURSOR RIGHT 




DATA. B 


*03, 


2, 


»1B, «48 


HOME UP 




DATA. B 


*07, 


3, 


*1B, *64 


ENTER 




DATA B 


»08, 


2, 


*1B, *44 


CURSOR LEFT 




DATA B 


■ SOB, 


2, 


«1B, *42 


CURSOR DOWN 




DATA. B 


*3A, 


2, 


»1B, *69 


BACK TAB 




DATA B 


*5D, 


2, 


*1B, *41 


CURSOR UP 




DATA B 


»4E, 


2, 


*30, *30 


DOUBLE ZERO-( 


00 KEY ) 


DATA. B 


*FF, 







NULL KEYCODE 


- END OF TABLE 


page 












RELEASE 


TABLE 












FORMAT : 


(KEYCODE, ACTION COI 


3E> 





Used on all Release keycodes 

The action code describes the type of key: 

9D = return dn Escape Sharp Sequence for this keycode 
9E = a Qualifier key 
all othor = character code to return 



ACTION CODE 



RLTABLE 




; 


KEYCODE 


DATA B 


«1F, 


DATA. B 


«3C, 


DATA B 


«3E, 


DATA. B 


*4B, 


DATA. B 


*49. 


DATA B 


*4A, 


DATA B 


*4C, 


DATA B 


♦FF, 



*9E 


RIGHT SHIFT 


«9E 


CAPS LOCK 


*9E 


LEFT SHIFT 


*9E 


CONTRdL 


«9E 


FAST 


»9E 


LEFT COMMAND 


*9E 


ALTERNATE 


*00 


NULL KEYCODE 



END OF TABLE 



BREAK KEYCODE TABLE 

SINGLE byte: table, this is the keycode which causes start/stop. 

Used on all kegcodes. 

The filler is to keep the file on an even bgte boundary 

BKEYCOD data. B *DF, ; BREAK CLOSURE KEYCODE, FILLER 

LENGTH EQU Z-VERSION i LENGTH OF DATA AFTER TRANSLATION TABLE 
END S1ART 



i'.7 



i>e 



7.0 Program CSK. DANSK listing 



THIS FILE CONTAINS THE TABLES FOR THE KEYBOARD DRIVER FOR THE VERSION 
04 Danish KEYBOARD (SelHctric sttile mith ALT key). 

NOTE ; 

Because this document uias printed on a standard ASCII printeri 

special Danish characters are printed as ASCII characters. 



file 
date 



csk. dansk. text 
05-0ct--B2 kb 



TRANSLATION TABLE 

TRANTBL 

DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 



STABLE - TRANTBL 

RTABLE - TRANTBL 

ETABLE - TRANTBL 

SMTABLE- TRANTBL 

CQTABLE- TRANTBL 

RLTABLE- TRANTBL 

BKEYCOD- TRANTBL 



POINTER TO SHIFT TABLE. 
POINTER TO REGULAR TABLE 
POINTER TO ESCAPE # TABLE 
PTR TO STANDARD MULT CHAR TABLF 
POINTER TO CAP/QUALIFIER TABLE 
POINTER TO RELEASE TABLE 
POINTER TO BREAK KEYCODE TABLE 



LENGTH OF FILE DATA AFTER TRANSLATION TABLE 

DATA. W LENGTH 
VERSION DATE 
VERSION DATA. B '0S1082' iddmmyy - day month year 



START 
page 



NOTE: 



DATA. B 
RTS 



All the tables have keycodes uiith the closure/release bit (MSB) of the 
Keycode clear (0)/ except the Break Keycode Table. 

THE SHIFT TABLE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 
CODE FOR THE CORRESPONDING KEYCODE. 

Used on Closure only when Shift key is still depressed (Shift flag is set) 

The character symbol is above each character code 

SMC « special value for Standard Multiple Character Sequence (*9E) 

QUL = special value for Qualifier (*9F) 

EST = special value for Escape Sharp Character Sequence <«9D) 



- £'9 



= No key for this keycode 



STABLE 



SMC 3 9 SMC 6 , - cr SMC 1 7 SMC 4 S 5 2 ; MSB 

DATA. B »9E, »33, •3'?, »9E, »36, *2C , »2D, »0D, »9E, »31, »37, »9E, »34, »38, »33, *32 ; »00 

+ . . . " del cr ; -' . . . ) ? P L S R ClUL 

DATA. B »2B, »00. «22. »7F, SOD, *3A, »7E, »00. »29, *3F, *50, *5F, *5B, «5D, *5C, «9F ; «10 

EST EST EST EST EST * X R T F V B 

DATA. B »9D, *9D, *9D. »9D, »9D, «00, •00, »00, «24, $25, ♦32, «34, »46, »47, «56, *42 i *20 

e#wESDXc sic : smc q qul a qul y 

DATA. B *40, ♦23, ♦57, ^45, ♦BS, ^44, ♦SB, ^43, ♦IB, ^21, ♦9E, ♦SI, ♦9F, ♦41, ♦9F, ^59 i *30 
'SiZUHJNM QUL QUL QUL sp QUL SMC 

DATA. B SSE, ♦26, SSA, ♦55, ♦48, ♦4A, ♦4E, ♦4D, ♦9F, ♦9F, ♦9F, SaO, ♦9F, ♦30, ♦9E, ♦2E ; ^40 
» ( I O K L < > EST EST EST EST EST SMC EST EST 

DATA. B ♦2A, ^28, ^49, ♦4F, ^46, ♦4C, ♦SC, ♦SE, ♦9D, ^90, ♦9D, ^90, ^90, ♦9E, ♦9F, ♦9F > ♦50 

LSB 01234567B9ABCDEF 

page 

THE REGULAR TABLE - UNSHIFTED OR LOWER CASE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 
CODE FOR THE CORRESPONDING KEYCODE. 

Used on Closure only uihen Shift key Is released (Shift flag is clear). 

The character symbol is above each character code 

SMC = special value for- Standard Multiple Character Sequence (♦9E) 
QUL = special value for Qualifier (♦9F) 

EST « special value for Escape Sharp Character Sequence (♦9D) 
... = No key for this keycode 

RTABLE 

; SMC 3 9 SMC 6 , - ct SMC 1 7 SMC 4 8 3 2 ; MSB 

♦9E, ^33, ^39, ♦9E, ^36, ♦2C, ^20, ♦OD, ♦9E, ♦SI, ♦37, ♦9E, ♦34, ^38, ^33, ^32 i ♦OO 

"... ' bscri "... O / p - 1 s r «UL 
♦3D, ♦OO, ^27, ♦08, ♦OD, ♦SB, ♦iO, ♦OO, %30, ♦2F, ♦70. ^20, ♦7B, ♦7D, ♦7C, ♦9F / SIO 

EST EST EST EST EST 4 5 r t f g v b 

♦ 9D, ♦9D, ♦9D, ^90, ♦9D, ♦OO, ♦OO, ♦OO, ♦34, ♦SS, ^72, ^74, ^66, %(i7 , *7b, 9b3 i *3Q 

2 3 ui e s d X c esc 1 SMC q QUL a QUL y 

♦32, ♦SS, ♦77, ♦as, ^73, ♦64, ♦78, *63, ♦IB, *31, ♦09, ♦71, ♦9F, ^61, ♦9F, ^79 ; ♦ao 

6 7 I u h J n m QUL QUL QUL sp QUL SMC 

♦36, ♦37, ♦7A, ♦73, ^68, ♦6A, ♦&£, ^60, ♦9F, ♦9F, ♦9F, ♦20, ♦9F, ♦SO, ♦9E, ♦2E i ^40 

8 9 i o k 1 , EST EST EST EST EST SMC EST EST 

♦38, ^39, ^69, ♦iF, ♦6B, tbC, ♦SC, ♦2E, ♦9D, ^90, ^90, ^90, ♦9D, ♦9E, ♦9F, ♦9F i ♦50 

0123456789ABCDEF 

THE CAPS/QUALIFIER FLAG TABLE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE ENTRY FOR 
THE CORRESPONDING KEYCODE. 



DATA. 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


DATA. 


B 


LSB 




page 





30 



Used on Closure when a *9F is in the Keycode entry of the Shift or Regular 
Table, process a Qualifier. Also on Closure uihen the Caps Lock Key is 
being pressed (CapsLock -flag is set). 

Used on Release when a *9E action code is in the Keycode entry of the Release 
Table. 

Each byte has 8 flags 

D7 = Caps lock flag when set means this k eycode ' generates a 

shifted character when the Caps lock qualifier flag is set. 
D6 = Qualifier has an ESC # sequence flag. When set then must process 

the keycode as a non-repeating ESC # sequence. Also ha? a Release 

Hi e q u e n t e . 



D5 
D4 
D3 
D2 
Dl 
DO 



Command — 
Al ternate 
Fast 

Capij luck 
Contra 1 
Shift 



This bit says which type of Ouallfipr 
key the Keycode represents. 



CQTABLE 

DATA B 
DATA. B 
DATA. B 
DATA. B 
DATA. B 
DATA. B 
, LSB 
page 
ESCAPE 



*00, »00, 
*00, »00, 
«00, «00, 
*00, »00, 
$00, *00, 
»00, »00, 
1 

SHARP (#) 
FORMAT : 



SCO, »00, 
*00, SOO, 
*00, «00, 

»so, *ao, 

*80, *80, 

«S0, *80, 

P 3 



$00, «00, 
*00, *00, 
«00, $00, 
*B0, *80, 
*80, »B0, 
«S0, «80, 
4 D 



*00, »00, 
*00, *00, 
«00, *00, 
*S0, *80, 
*80, *B0, 
*00, «00, 
6 7 



»00, »00, 
»00, *00, 
«00, «00, 
*00, *00, 

*02, *oe, 

»00, «00, 
8 7 



»00, »00, *00, 
*80, SOO, $00, 
*80, $80, *80, 
»00, S80, *04, 
*60, »00, *10, 
*00, *00, *00, 
ABC 



»00, »00, «00 
»00, *00, SOI 
*80, »80, «80 
*80, »01, *80 
*00, *00, $00 
*00, *00, $00 
E F 



, MSB 
1 «00 
I »10 
i *20 
; «30 
i 440 
i «50 



SEQUENCE TABLE 
(KEYCODE, FILLER, US/UC, SHIFT, COMMAND, C/S) 



Used on Closure when a S9D is in the Keycode entry of the Shift or 

Regular Table 
Used on Release when a *9D action code is in the Keycode entry of 

the Release Table Release keycode has high order bit set. 

The fill field is added to keep each record on an even byte boundary 
The other fields contain the character sequence to follow the ESCAPE # 
characters: 

US/UC = when the Shift and Command key are not pressed 

SHIFT = when only the Shift key is still being pressed 

COMMAND = when only the Command key is still being pressed 

C/S = when the Shift and Command keys are still being pressed 

ETABLE 

KEYCODE FILL 
DATA B »20, 0, 
DATA. B «21, 0, 



US/UC 


SHIFT 


COMMAND 


C/S 




'00', 


'OA', 


'14', 


'IE' 


i FUNCTION KEY 1 


'01 ', 


'OB', 


'15', 


'IF' 


i FUNCTION KEY 2 



- 31 



DATA 


B 


*33, 


0, 


DATA 


B 


*23, 


0, 


DATA 


B 


»24, 


0, 


DATA 


B 


»4A, 


0, 


DATA 


B 


»5B, 


0, 


DATA 


B 


»59, 


0, 


DATA 


B 


»5A, 


0, 


DATA 


B 


»5B, 


0, 


DATA 


B 


*5C, 


0, 


DATA 


B 


*CA, 


0, 


page 









02', 


'OC, 


'16 


03', 


'OD', 


'17 


01 ', 


'OE', 


'18 


FF', 


'FF', 


'FF 


05 ', 


'OF', 


'19 


06', 


'10', 


'lA 


07', 


'11 ', 


'IB 


08', 


'12', 


'It 


09', 


'13', 


'lU 


FE', 


'FE', 


'FE 



20' 


FUNCTION KEY 


3 


21 ' 


FUNCTION KEY 


4 


22' 


FUNCTION KEY 


3 


FF' 


LEFT COnMAND 


C CLOSURE- ) 


23' 


FUNCTION KEY 


6 


24' 


FUNCTION KEY 


7 


2li' 


FUNCTION KEY 


8 


26' 


FUNCTION KEY 


9 


27' 


FUNCTION KEY 


10 


FF. ' 


LEFT COMMAND 


(RELEASE) 



STANDARD MULTIPLE CHARACTER SEQUENCE TABLE 

FORMAT : < KEYCODE, LENGTH, CHARACTER_SEQUENCE ) 

Used on Closure uilien a *9E is in the Keycode entry of the Shift or 
Regul.ir Table. 

The LENGTH field is the nomber of characters in the CHARACTER SEQUENCE field 
The CHARACTER SEQUENCE is the characters to return for the Keycode 



SMTABLE 

DATA B 
DATA B 
DATA. B 
DATA B 
DATA. B 
DATA B 
DATA B 
DATA B 
DATA U 
page 



KEYCODE Li-NGTH CHARACTER SEQUENCE 

«00, 2, 

»03, 2, 

*07, 2, 

*08, 2, 

*0B, 2, 

«3A, 2, 

S5D, 2, 

«4E, 2, 

«FF, 



*1B, »43 


; CURSOR RIGHT 




*1B, «4B 


i HOME UP 




»1B, »64 


i ENTER 




*IB, »44 


i CURSOR LEFT 




*1B, »42 


i CURSOR DOWN 




*IB, «69 


i BACK TAB 




*1B, *41 


; CURSOR UP 




t30, *30 


; DOUBLE ZERO- ( 


00 KEY ) 




; NULL KEYCODE 


- END OF TABLE 



RELEASE TABLE 
FORMAT 



(KEYCODE, ACTION CODE) 



Used on all Release keycodes. 

The action code describes the type of key: 

9D = return an Escape Sharp Sequence for this keycode 
9E = a Qualifier key 
all other = character code to return 



RLTABLE 

KEYCODE 

DATA. B *1F, 

DATA. B *3C, 

DATA B t3E, 

DATA B *48, 

DATA. B *49, 



ACT ION CODE 



*9E 


RIGHT SHIFT 


*9E 


CAPS LOCK 


*9E 


LEFT SHIFT 


*9E 


CONTROL 


»9E 


FAST 



■J3 - 



DATA. B *4A, *9E > LEFT COMMAND 

DATA. E »4C, «9E (ALTERNATE 

DATA. B *FF, «00 i NULL KEYCODE - END OF TABLE 

; BREAK KEYCODE TABl E 

SINGLE BYTE TABLE. THIS IS THE KEYCODE WHICH CAUSES START/STOP. 

; Used on all kegcodes. 

i The filler is to keep the flip on an even byte boundary 

BKEYCOD DATA. B *DF, ; BREAK CLOSURE KEYCODE, FILLER 

LENGTH ECJU "/.-VERSION i LENGTH OF DATA AFTER TRANSLATION TABLE 
END B1 ART 
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8.0 Program CBK. GRMN. TEXT listing 



THIS FILE CONTAINS THE TABLES FOR THE KEYBOARD DRIVER FOR THE VERSION 
03 German KKYBDARD (Selectric style (uith ALT keg). 

NOTE: 

Because this document utas printed on a standard ASCII printer/ 

special German characters are printed as ASCII characters. 



file 
date 



csk . grmn. tpx t 
05-0ct-82 kb 



TRANSLATION TABLE 

TRANTBL 

DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 
DATA. L 



STABLE - TRANTBL 
RTABLE - TRANTBL 
ETABLE - TRANTBL 
SMTABLE- TRANTBL 
CQTABLE- TRANTBL 
RLTABLE- TRANTBL 
BKEYCOD- TRANTBL 



POINTER TO SHIFT TABLE 

POINTER TO REGULAR TABLE 

POINTER TO ESCAPE # TABLE 
PTR TO STANDARD MULT CHAR TABLE 

POINTER TO CAP /QUALIFIER TABLE 

POINTER TO RELEASE TABLE 

POINTER TO BREAK KEYCODE TABLE 



LENGTH OF FILE DATA AFTER TRANSLATION TABLE 

DATA. W LENGTH 
VERSION DATE 
VERSION DATA. B '031082' iddmmyg - day month year 



DATA. B 
RTS 



START 
page' 

NOTE : 

All the tables have keycodes uilth the closure/release bit (MSB) of the 
Keycode clear (O). except the Break Keycode Table. 

THE SHIFT TABLE 

TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 
CODE FOR THE CORRESPONDING KEYCODE. 

Used on Closure only uihen Shift key is still depressed (Shift flag is set). 

The character symbol is above each character code 

SMC •: special value for Standard Multiple Character Sequence ($?E) 

QUL = special value for (Jualifier (*9F) 

EST = special value for Escape Sharp Character Sequence (S9D) 
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« No key for this keycodo 



STABLE 



; SMC 3 9 SMC 6 , - cr SMC 1 7 SMC 4 8 3 2 /MSB 

DATA. B «9E, »33, *39. »9E, «36, «2C- «2D, »0D. *9E, «31, «37, «9E. «34, «3B, *35, *32 ! «00 

i + ..." del cr : ' . . . ) ? P _ O U A nUI. 

DATA. B »2B, »00, »22, *7F, SOD, »3A. »60, *00, »29, »3F, fSO, •3F. »5C, *3D, «SB, «9F ; »10 

i EST EST EST EST EST » 7. R T F G V B 

DATA. B *9D, *9D, *9D, t9D, »9D, »00. *00, »00. »24, •23, »52, •34, »46, »47, »36, $42 i $20 

i C#WESDXC esc <. SMC Q QUL A QUL Y 

DATA. B *40, •23, S37, •43,»53, *44, ^38, •43, •IB, »21, •9E, «51, »9F, »41, 99F, »39 i »30 

i '■ S, Z U H J N M QUL QUL QUL sp QUL O SMC 

DATA. B »5E, «26, «3A, *33, *48, *4A, «4E, »4D. •9F, »9F, •9F, »20, •9F, S30, •9E, *2E ; 440 

i » ( I □ K L. ■:: > EST EST EST EST EST SMC EST EST 

DATA. B •2A, ^28, »49, »4F, •4B, •4C, *3C, »3E, •9D, ¥90, $90, 990, »9D, •9E, «9F, *9F i »30 

; LSB 012 34S6789ABCDEF 

page 

i 

I THE REGULAR TABLE - UNSHIFTED OR LOWER CASE 

i TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE CHARACTER 

i CODE FOR THE CORRESPONDING KEYCODE. 

i Used on Closure only uihen Shift key is released (Shift flag Is clear). 

,' 

; The character symtrol is above each character code 

i SMC » special value for Standard Multiple Character Sequence <»9E) 

i QUL " special value for Qualifier (*9F) 

; EST s special value for Escape Sharp Character Sequence ($90) 

I ...» No key for this keycode 

i 

RTABLE 

; SMC 3 9 SMC & , - cr SMC 1 7 SMC 4 8 3 2 i MSB 

DATA. B «9E, «33, *39, «9E, •36, •2C- »2D, SOD, «9E. •31, •37, •9E. «34, •SB, SSS, *32 / »00 

I "... ' bscri Z...0 / p - o u a QUL 

DATA. B »3D, •00, »27, »08, •OD, *3B, •7E, •00, »30, »2F, ^70, •2D, *7C, •7D, «73, *9F ; *10 

i EST EST EST EST EST 4 3 r t f g v b 

DATA. B »9D, •9D, »9D, •9D, •9D, «00, •00, •OO, ^34, •SS, »72, »74, «66, •67, •76- «62 i *20 

; 23uiesdxc esc 1 SMC q. QUL a QUL y 

DATA. B »32, •SS, »77, •63, ^73, ^64, ♦78, «63, •IB. •SI, ^09, •71, •9F, •61, »9F, *79 ; «30 

i 6 7 z u h J n m QUL QUL QUL sp QUL SMC 

DATA. B ^36, ¥37, ♦7A, ^73, ^68, *6A, •6E, «6D, •9F, •9F, •9F, •20, •9F, •SO, •9E, •2E i 440 

i a 9 i o k 1 , . EST EST EST EST EST SMC EST EST 

DATA. B •SS, •39, «69. •6F, ^68, ^60, •2C, •SE, *9D, •9D, •9D, •9D, •9D, •9E, »9F, »9F i *30 

; LSB 123456789A,BCDEF 

page 

i THE CAPS/QUALIFIER FLAO TABLE 

; TABLE IS INDEXED BY KEYCODE. EACH BYTE REPRESENTS THE ENTRY FOR 

i THE CORRESPONDING KEYCODE. 
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Used on Closure uihen a *9F is in the Keycode entry of the Shift or Regular 
Table, process a Qualifier. Also on Closure uhen the Caps Lock Key is 
being pressed <CapsLock flag is set). 

Used on Release uhen a $9E action code is in the Keycode entry of the Release 

Table. 

Each byte has 8 flags 

D7 = Caps lock flag uhen set means this keycode generates a 

shifted character when the Caps lock qualifier flag is set. 
D6 = Qualifier has an ESC # sequence flag. When set then must process 

the keycode as a non-repeating ESC » sequence. Also has a Release 

sequence. 



D5 = Command — 
D4 = Alternate 
D3 = Fast 
D2 = Caps lock 
Dl = Control 
DO = Shift 



This bit says uihlch type of Qualifier 
key the k^eycode represents. 



CQTABLE 

DATA. B 
DATA. B 
DATA. B 
DATA. B 
DATA. B 
DATA. B 
i LSB 
page 
ESCAPE 



i MSB 

*oo, *oo, «oo, «oo, »oo, *oo, »oo, »oo, *oo, »oo, too, »00, »00, »00, »00, »00 i «00 

*00, *00, «00, »00, WOO, «00, *00, *00, *00, »00, »80, *00, *00, »00, »00, *01 ; *10 

»00, »00, *00, »00, «00, «00, »00, »00, »00, »00, »80, «80, »80, »80, «80, »80 i «20 

»00, »00, «80, »a0, «80, »80, »S0, »80, *00i «00, «00, »80, 904, «80, »01, »S0 i «30 

«00, «00, SSO, «80, «80, »80, *80, «80, «02, «08, S&O, «00, «10, «00, «00, «00 i »40 

»00, «00, «80, *80, «S0, »80, *Q0, »00, *00, WOO, SOO, «00, »00, *00, «00, «00 i «50 
Oir. 3456789ABCDEF 

SHARP (#) SEQUENCE TABLE 

FORMAT : (KEYCODE, FILLER, US/UC, SHIFT, COMMAND, C/S) 



Used on Closure mhen a *9D is in the Keycode entry of the Shift or 

Regular Table. 

Used on Release uihen a 99D action code is in the Keycode entry of 

the Release Table. Releas keycode has high order bit set. 

The fill field is added to keep each record on an even byte boundary 
The other fields contain the character sequence to folloiu the ESCAPE # 
characters: 

US/UC = iDhen the Shift and Command key are not pressed 

SHIFT = mhen only the Shift key is still being pressed 

COMMAND " uihen only the Command key is still being pressed 

C/S = uihen the Shift and Command keys are still being pressed 

STABLE 

i KEYCODE FILL 

DATA. B *20, 0, 

DATA. B *21, 0, 



US/UC 


SHIFT 


COMMAND 


C/S 




'00', 


'OA', 


'14', 


'IE' 


i FUNCTION KEY 1 


'01 ', 


'OB', 


'IS', 


'IF' 


1 FUNCTION KEY 2 
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oc, 


16', 


OD', 


17', 


OE', 


IB', 


FF', 


FF', 


OF', 


19', 


10', 


lA', 


11 ', 


IB ', 


12', 


IC, 


13', 


11)', 


FE', 


FE-', 



20' 


FUNCTION KEY 


3 


2] ' 


FUNCTION KEY 


4 


22' 


FUNCTION KEY 


5 


FF' 


LEFT COMMAND 


(CLOSURF/ 


23' 


FUNCTION KEY 


6 


24' 


FUNCTION KEY 


7 


25' 


FUNCTION KEY 


B 


26' 


FUNCTION KEY 


9 


27' 


FUNCTION KEY 


10 


FE' 


LEFT COMMAND 


< release: > 



'02- 
'03' 
'04 ' 
'FF ' 
'05- 
'06' 
'07' 
'08 ' 
'09 ' 
'FE ' 



STANDARD MULTIPLE CHARACTER SEQUENCE TABLE 

FORMAT : ( KEYCODE, LENGTH, CHARACTER_SEQUENCE ) 

Used on Closure when a *9E is in the Keycode entry of the Shift ot 
Regular Table. 

The LENGTH field is the number of characters in the CHARACTER SEQUENCE 
The CHARACTER SEQUENCE is the characters to return for the Keycode. 



DATA. 


B 


*22, 





DATA. 


B 


$23, 





DATA. 


B 


»24, 





DATA. 


B 


»4A, 





DATA. 


B 


*5B, 





DATA. 


B 


«59, 





DATA. 


B 


*5A, 





DATA. 


B 


»5B, 





DATA. 


B 


*5C, 





DATA 


Q 


*CA, 





page 









f i e 1 d 



SMTABLE 














; 


KEYCODE 


LENGTH 


CHARAC1ER 


SEQUENCE 




DATA. B 


$00, 


2, 


«]E, *43 




CURSOR RIGHT 




DATA. B 


*03, 


2, 


»1B. «4a 




HONE UP 




DATA. B 


*07, 


2, 


»1B, *64 




ENTER 




DATA. B 


«0B, 


2, 


»13, »44 




CURSOR LEFT 




DATA. B 


SOB, 


2, 


»1B, $42 




CURSOR DOWN 




DATA. B 


*3A, 


2, 


«1B, $69 




BACK TAB 




DATA. B 


%r>D, 


2, 


SIB, *41 




CURSOR UP 




DATA. B 


«4E, 


2, 


$30, *30 




DOUBLE ZERO-< 


00 KEY ) 


DATA. B 


*FF, 









NULL KEYCODE 


- END OF TABLK 


page 












i RELEASE 


TABLE 










i 


FORMAT : 


(KEYCODE, ACTION. 


CD 


rjE) 





Used on all Release keycodes. 

The action code describes the type of key: 

9D = return an Escape Sharp Sequence for this keycode 
9E = a Qualifier key 
all other = character code to return 



RLTABLE 

; KEYCODE 

DATA. B *1F, 

DATA. B *3C, 

DATA. B *3E, 

DATA. B *48, 

DATA. B $49, 



ACTION CODE 



S9E 


RIGHT SHIFT 


*9E 


CAPS LOCK 


«9E 


I EFT SHIFT 


»9E 


CONTROl 


*9E 


FAST 



- :hb 



DATA B ■54A- $<?£ , LEFT COMMAND 

DATA B *4C. «VI£ ; ALTERNATE 

DATA. B *FF, *00 ; NULL KEYCODE - END OF TABLE 

BREAK K,EYCDnE TABLE 

SINGLE BYTE TABLE. THIS IS THE K.EYCODE WHICH CAUSES START/STOP 

Used on all ketj codes. 

The filler is to keep the file on an even byte boundary 

BKEYCOD DATA. B SDF, ; BREAK CLOSURE KEYCODE, FILLER 

LENGTH EQU -/.-VERSION ; LENGTH OF DATA AFTER TRANSLATION TABLE 
END START 
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